#! usr/bin/perl -w

sub foo {

print "hello";
#return "Neha";
}

print foo;
print "\n";