#!/usr/bin/perl unlink $0; print "Hello, afterworld!\n";