note
dorko
I think you can't find anything because Perl is smart enough to "Do What You Mean" (tm).
<CODE>
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
my ($number1, $number2, $number3) = <DATA>;
my $number = 5.13E-04;
my $other = "5.13E-04";
print "sum 1 = ", $number + $other;
print "\n";
print "sum 2 = ", $number1 + $number2 + $number3;
__DATA__
5.12E-04
5.12E+04
1
</CODE>
Results:
<CODE>
sum 1 = 0.001026
sum 2 = 51201.000512
</CODE>
<P>
Cheers,<P>
Brent<BR>
<div class="pmsig"><div class="pmsig-10261">
<I>-- Yeah, I'm a <A HREF="http://www.delts.org/">Delt</A>.</I>
</div></div>
449573
449573