#!/usr/bin/perl

use strict;
use warnings;

$0 = 'The phantom strikes again - so ha!';
sleep 60;