print $$f;
{
  no strict 'refs';
  print $$f;
  print $$g;
}
print $$f;

##</code><code>##

print $$f;
switch on the strict refs flag;
print $$f;
print $$g;
switch off the strict refs flag;
print $$f;

##</code><code>##

print ( dereference $f allowing strings );
print ( dereference $f not allowing strings );
print ( dereference $g not allowing strings );
print ( dereference $f allowing strings );

##</code><code>##

use MyModule; # this will be run once at compile time
print "hello\n";
use MyModule; # this will be run once at compile time

for (1..10)
{
  use MyModule; # this will be run once at compile time
  print $_;
}