#!perl -w use strict; warn "(1) Starting up a browser...\n"; system(1, "son.html"); warn "(2) Browser quits...\n"; sleep 10; warn "(3) Bye, bye...\n"; exit 0;