Select Code to Download

#!/usr/bin/perl -w
# Note: the 'die' on the next line will probably never trigger
...
# if the command line had a problem, you'd see this 'die' trigger, not
# the one on the 'open'
close PH or die "$!: opening pipe";