in reply to First program revisited

too tired to answer directly to the code, but for the last two questions see this code:
use strict; use warnings; my @numbers = 4 .. 6; my $number_of_trailing_zeros = 3; my $commify_at = 3; @numbers = map { $_ .= "0" x $number_of_trailing_zeros; $_ =~ s/(\d{$commify_at})$/,$1/; $_; } @numbers; print "@numbers";
btw is there a special reason why some write use warnings before use strict?

anyway, HTH ;)

Replies are listed 'Best First'.
Re: Re: First program revisited
by mooseboy (Pilgrim) on Nov 29, 2002 at 08:04 UTC

    Thanks to all for the help. Never really thought about the order of the pragmas, maybe it's the subconscious mind attempting to imitate the order of:

    #!/usr/bin/perl -w use strict;