#!/usr/local/bin/perl -s

print ("Hello\n") if ($H == 1);
print ("Goodbye\n") if ($G == 1);
