Select Code to Download

#!/usr/bin/perl 
use warnings;
...
}
__END__

#!/usr/bin/perl -w
use strict;
...
    #always return TRUE to continue the callback
    return TRUE;
}

#!/usr/bin/perl
use warnings;
...
}

__END__