#!/usr/bin/perl ## php_return_or_not.perl ## RJM Programming ## May 2016 print "You can return ... " . return_or_not(0) . " ... or you can display ... "; return_or_not(1); sub return_or_not { my $retval = "The quick brown fox jumps over the lazy dog."; if ($_[0] != 0) { print $retval . "\n"; } else { return $retval; } }