|
|
|
| Think about Loose Coupling | |
| PerlMonks |
Re^4: Parsing and modifying CSV filesby poj (Abbot) |
| on Sep 26, 2005 at 21:18 UTC ( #495220=note: print w/replies, xml ) | Need Help?? |
|
If you substitute $sz with 0 the expression becomes
$data[$fno[0]]
and because
$fno[0] = 9
this equates to
$data[9]
If the expression
$stock{$ky}[0] eq '0'
is true then
$data[9] = ''
else
$data[9] = '0'
poj
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||||