use strict; use warnings; my @array = ("Hello world\n";); if (@ARGV) { print $array[0]; } # #### inside the blockquote.

#### #!/usr/bin/perl use warnings; use strict; use (some module); if (some condition) { do something; and something more; # with a comment to make this a very, very long line which will wrap in many browser windows, absent a gigundo monitor and so on. If you don't have auto code wrap on in "code," you'll see a red plus sign and a lack of line number on the continuations after wrapping is performed (sometimes at unfortunate points, as can be seen in this instance, if you don't have auto code wrap turned on. } else { &whatever; # Note below } sub whatever { do something; }