• Parser.pm

    112 113  
    55 55 return $self;
    56 56 }
    57 57 }
    58 } elsif ((ref $input eq "GLOB") or (ref $input eq 'Apache::Upload') or (ref $input eq 'IO::File')) {
    58 } elsif ( ref $input eq 'Apache::Upload' ) {
    59 $fh = $input->fh;
    60 } elsif ((ref $input eq "GLOB") or (ref $input eq 'IO::File')) {
    59 61 $fh = $input;
    60 62 } elsif (ref $input eq "SCALAR") {
    61 63 $fh = IO::Scalar->new($input);