procedure perl is begin(print 'Hello World!\n')