sub FOO::new {
    package FOO;
    use strict 'refs';
    
}
sub FOO::try {
    package FOO;
    use strict 'refs';
    print "Trying...?\n";
}
use strict 'refs';
do {
    'FOO'->new
}->try;

##</code><code>##

do { 'FOO'->new }