Help for this page

Select Code to Download

Select or download this

if ('GLOB' eq ref $param) {
    print "filehandle";
} else {
    print "filename";
}