#!/usr/bin/perl -T -w

use strict;
use warnings;

$SIG{'__DIE__'}=\&noSuchFunction;
print "You should not see this text\n"; # but you will!