#!/usr/bin/perluse warnings;use Symbol;my $fqname = qualify('scalar','My::Module');$$fqname = "Hello World\n";print $My::Module::scalar;