Subroutine Perl

printhello;
sub printhello
{
    print "Hello!";
}