Select Code to Download

sub readrec {

...

    $rec;
}