use strict;

package FOO;

sub new {};

sub try {
    print "Trying...?\n";
}

package main;

try {
  new FOO;
};

##</code><code>##

Trying...?

##</code><code>##

# Under Construction