Pancreas hotline

#!/s/std/bin/perl print "Content-type: text/html\n\n"; $pnum = 5; print " Pancreas hotline "; print '

There have been ', $pnum, ' pancreases (pancreii?) on-line'; print ' lately.

'; print 'Now go away. ';