use strict;
use warnings;
                                                                                
my $foo;
                                                                                
print "hshsh $foo ";