aboutsummaryrefslogtreecommitdiff
path: root/title.pl
blob: 2f402f98f70243b70ea48064503b60408d6c2400 (plain)
1
2
3
4
5
6
7
#!/usr/bin/perl -w

use bytes;
print chr($_) for (0xff, 0xff, 0x40, 0xbc, 0xff, 0xbf);
undef $/;
$_ = <>;
print $_;