DB<108> sub nopro { print @_ } DB<109> sub pro ($) { print @_ } DB<110> @a=3..7 => (3 .. 7) DB<111> nopro(@a) 34567 DB<112> pro(@a) 5