System Functions Perl

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