#!/usr/bin/perl -w
use strict;

# Prints a simple greeting.
# Exits with the argument provided, or 0 by default.

print "Hello\nGoodbye\n";

exit($ARGV[0] || 0);