Vlákno názorů k článku Softwarová sklizeň (2. 1. 2008) od kes - Perl má switch, ale jmenuje se given :-)...

Perl má switch, ale jmenuje se given :-)
Kromě toho nevidím nějaký zásadní rozdíl mezi

given ($foo) {
	when (/^abc/) { $abc = 1; }
	when (/^def/) { $def = 1; }
	when (/^xyz/) { $xyz = 1; }
	default { $nothing = 1; }
} 

a

for ($foo) {
	if    (/^abc/) { $abc = 1; }
	elsif (/^def/) { $def = 1; }
	elsif (/^xyz/) { $xyz = 1; }
	else { $nothing = 1; }
} 

A který sort takový switch má? Oběhl jsem zkusmo několik unixovitých systémů v okolí a nikde jsem ho nenašel. Už se mi po něm také párkrát stýskalo.