Select Code to Download

sub hello {
    print $hello;
}

1; # need to end with a true value

#!/usr/bin/perl

...

$hello="hello123";
hello();                  # prints "hello123"

sub hello {
    my $hello_msg = shift;
...
hello($hello);
# or just:
# hello("hello123");