goto LABEL
(with all the restrictions that goto suffers). Think of it as a goto with an intervening core dump and reincarnation. If
LABEL is omitted, restarts the program from the top.
WARNING: any files opened at the time of the dump will
NOT be open any more when the program is reincarnated, with possible resulting confusion on the part of Perl. See also
-u option in the perlrun manpage.
Example:
#!/usr/bin/perl require 'getopt.pl'; require 'stat.pl'; %days = ( 'Sun' => 1, 'Mon' => 2, 'Tue' => 3, 'Wed' => 4, 'Thu' => 5, 'Fri' => 6, 'Sat' => 7, );
dump QUICKSTART if $ARGV[0] eq '-d';
QUICKSTART: Getopt('f');