C:\tmp>perl t.pl
%TERM%
vt220