Returning a value from Perl Script

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


print "This is going to exit\n";
exit 2;
[download]

$> perl aboveProgram.pl
This is going to exit
$> echo $?
2
$>