Subroutine Perl

  1. Home
  2. Perl
  3. Subroutine
  4. Create a subroutine
#!/usr/bin/perl 
print "Content-Type: text/html \n\n"; 
print "Program starts.\n"; 
&bigHeader; 
print "Program ends.\n"; 
# subroutines below this line 
sub bigHeader { 
    print "

Welcome to Auto!

\n"; 
}