#!/usr/bin/perl
print "It is in my nature to segfault,\n";
kill 11,$$;
print "how can I not.\n";