in reply to ((Conditional, Ternary Operator)) Specifying default and non-default values

my @pod = qw(HostCycle Instinet index);
my %ext = ( index => 'pod' );
system "pod2html $_.".($ext{$_}?$ext{$_}:'pm')." > $_.html" foreach @p
+od;

[download]
Enjoy! 
--
Casey
   I am a superhero.

In Section Seekers of Perl Wisdom