if (ref \$glob ne 'GLOB') {
    my $ref = ref \$glob;
    say "$glob: ref=$ref";
}