#!/usr/bin/perl @alphabet = ("A".."Z"); @integers = (1..10); print "alphabet = @alphabet\n"; print "alphabet[4] = $alphabet[4]\n"; print "integers = @integers\n"; for (1..3) { print "hello\n"; } $x = sqrt(25); print "sqrt(25) = $x\n";