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