- or download this
#!/usr/bin/perl
use strict;
...
sleep 1;
$obj->soft_boot();
}
- or download this
package Cool;
use strict;
...
require 'magic';
'This statement is false';
- or download this
package Cool;
use strict;
...
sub soft_boot { do 'magic'; }
'This statement is false';