#perl
$infile = "08017.SPL";
$outfile = "08017.SPL.emf";
open FH1,"<$infile";
$info = <FH1>;
close FH1;

#
#
#



open FH2,">$outfile";
print FH2 $info
close FH2

#end