You could try something like this:
#######################
use strict
@a = qw(10.000 100.00 1000000.00000 1000.000);
$a = $b = "";
foreach $val (@a) {
($a,$b) = split(/\./,$val);
write;
}
format STDOUT =
@>>>>>>>>>.@<<<<<<<<<
$a,$b
.
#######################
> -----Original Message-----
> From: Govinderjit Dhinsa [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, September 06, 2001 9:38 AM
> To: '[EMAIL PROTECTED]'
> Cc: '[EMAIL PROTECTED]'
> Subject: Printf
>
>
> How could I please put the following example;
>
> 1000.000
> 10.0000000
> 100.0000000
> 10000.0000000
> To please print out, IN A LINE with the Decimal Place! and
> not from the
> first number, so all the decimal places would line up!
> example;
>
> I have tried printf and had no luck
>
> Thanks
> GD
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]