#!/usr/bin/perl -w

use strict;

use warnings;

# This program always exits with the value supplied.  Perfect

# for testing.  ;)

my $exit_value = shift(@ARGV) || 0;

exit($exit_value);