Select Code to Download

use warnings;
use strict;
...
        print $1, " : ", $2, $/;
    }
}

#!/usr/bin/perl
use warnings;
...
    }
}
close $fh or die "can't close this file:$!";