If you have a long Perl script, you'll probably find that there are parts of the script that you want to break out into subroutines. In particular, if you have a section of code which is repeated more than once, it's best to make it a subroutine to save on maintenance (and, of course, linecount).
A subroutine is basically a little self-contained mini-program in the form of block which has a name, and can take arguments and return values:
# the general case sub name { BLOCK } # the specific case sub print_headers { print "Programming Perl, 2nd ed\n"; print "by\n"; print "Larry Wall et al.\n"; } |