Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...

close IN;
close OUT;

Select or download this

perl -C0 -mbytes -e"BEGIN{$/=\384}" 
-ne"print unpack 'x2 A190 x2 A58', $_" <infile >outfile