#!/usr/bin/perl # Statement block (optional last ;) { print "Statement block:\n"; print "Statement 1\n"; print "Statement 2\n"; print "Statement 3\n"; print "\n\n"; }