Acme-Boom

 view release on metacpan or  search on metacpan

lib/Acme/Boom.pm  view on Meta::CPAN

package Acme::Boom; no warnings;
$VERSION = 0xdeadbeef + 1;

sub import {
  unpack "p", pack "L!", 1;
}

Earth-Shattering-Kaboom-!!1;

__END__

=head1 NAME

Acme::Boom - BOOM!

t/01.boom.t  view on Meta::CPAN

$SIG{BUS} = $SIG{SEGV} = sub {
  print "1..1\nok 1\n";
  exit 0;
};
eval q{ use Acme::Boom };
$" = qq{\n# };
print STDERR "# $@\n";
die FAIL;



( run in 0.235 second using v1.01-cache-2.11-cpan-a5abf4f5562 )