package Quiting; sub quiting { # Delete a temporary file system ('rm /tmp/mytmp.txt') if (-e '/tmp/mytmp.txt'); exit(0); }