Select Code to Download

open my $if1, '<', $input_f1 or die "Can't open $input_f1: $!\n";
open my $if2, '<', $input_f2 or die "Can't open $input_f2: $!\n";
...
    print join( '*', $key1, $vf1, $vf2 ), "\n";
############ </add>
}