Select Code to Download

open(FH, $opts{-file});
$opts{-handle} = \*FH;
$parser->from_handle(%opts);

sub from_handle {
    my $self = shift;
...
        #... and here we're supposed to read from FH
    }
}