Hi everyone,
I just to update my fedora (from 13 to 16) and I am trying to run a old pdl
code but it doesn't work. The code extracts the first column of the file
"opacity.txt" an save it in a perl array ,,,and then it looks for the position
of the string "Rosseland".
The shell shows me the following message:
"multielement piddle in conditional expression at test.pl line 9"
Does anybody know how to write the lines 8 and 9?
The code:
#!/usr/bin/perl
use PDL;
use List::MoreUtils qw{firstidx};
$fname = sprintf('opacity.txt');
@aux = rcols $fname,{PERLCOLS => [0]};
@col0 = @{$aux[-1]}; #line 8
$position = firstidx { $_ eq 'Rosseland' } @col0; #line 9
print $position, "\n";
Regards,
Denis.
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
