Select Code to Download

#... blah blah blah
            open(FH, $opts{-file});
            $opts{-handle} = *FH;
            return $parser->from_handle(%opts);
#... la dee da

#... stick out left leg
    while ( readline($opts{-handle}) ) {
...
        }
    }
# return right leg