Help for this page
#!/usr/bin/perl ... print "...and so on\n";
By taking a reference first... w ... w w ...and so on