#!perl use strict; use warnings; sub problem { $SIG{__DIE__} = sub { die "<b problem> will set a break point here.\n" }; warn "This line will run even if you enter <c problem>.\n"; } problem(); exit(0);
#!perl use strict; use warnings; sub problem { $SIG{__DIE__} = sub { die "<b problem> will set a break point here.\n" }; warn "This line will run even if you enter <c problem>.\n"; } problem(); exit(0);