The man in the street wants to know from perldoc -f my how to write my $a=0; my $b=0; my $c=0; as compactly as possible. Add an example progressing from my ($a,$b,$c); $a=$b=$c=0; to my ($a,$b,$c)=(0,0,0); and mention if that is as compact as it gets. "Under use strict, I've got a lot of variables to declare and initialize to zero", he thinks. "But all I can find are non streamlined ways of doing it. Perhaps I should consider map()..."