Select Code to Download

#!/usr/bin/perl -w
use strict;
...
   print;
   $mainfh = ($mainfh == $fh1) ? $fh2 : $fh1;
}

I'm
sure
this

pretty
that
works.

I'm
pretty
sure
that
this
works.