}
	print "Inside the sub at line 34: |$result|\n";
        return $result;
}

my $ result = egal($param);         # call the sub!
print "At line 39 (after the sub), \$result is: |$result|\n";
##</code><code>##

...
Use of uninitialized value in concatenation (.) or string at 848064_xyz.pl line 22.

++++Inside the sub at line 34: |false|
At line 39 (after the sub), $result is: |false|