open(ME, "$0") or die "crap $!";

close(STDERR);
use warnings;


while (<ME>) {
    print;
}
close ME;