my $hello = hello();

sub hello {

    my $h = shift;
    return;

}

print $hello;