# Outputs file in DOS format.
# Accepts input files in unix format.
# Runs on DOS.

{
   my $fh_in = upload('filepath');
   open my $fh_out, ...;
   print $fh_out while <$fh_in>;
}