#!/usr/bin/perl -w use strict; =cut =cut #=cut won't work with the 3rd one print "after the cut\n";