Help for this page
Select Code to Download
Select
or
download this
sub my_system { ... { print "Error occured : $@\n" }