if ($ARGV[0]) { print STDERR "$$\n"; } else { print "$$\n"; }