#!/usr/bin/perl
INIT {
    return if $ENV{DEBUG_SKIP_INIT};
    print "here INIT\n";
}
print "here main\n"; 

##</code><code>##

DEBUG_SKIP_INIT=1 perl -d