#!perl

BEGIN {
  die "Bad";
}