#!/usr/bin/perl
use strict;
use warnings;

my $foo = "BAR";
domystuff($foo);

# the interesting thing here is that the function domystuff has not been
# declared or defined at the point where it is called and yet perl can 
# still find it.  This is unlike C/C++

sub domystuff
{
    my $arg1 = shift;
    print "in domystuff\n";
    print "arg = $arg1\n";
}