$ perl -MSymbol=qualify -le " print qualify($_,q/Fooo/) for qw/ ARGV STDOUT STDERR _ AHOY / main::ARGV main::STDOUT main::STDERR main::_ Fooo::AHOY