Select Code to Download

sub print_summary {
    my ($type) = @_;
...
}
# ... later ...
print_summary("world");

sub summary {
    my ($type) = @_;
...
# ... later ...
print summary("world");
print summary("hello");