in reply to Can I pad a number with leading spaces rather than leading 0's
... would print ...#!/usr/bin/perl -w use strict; # every job should my $number = 222.42; printf("A: \$%10.2f\n",$number); printf("B: \$%-10.2f\n",$number);
%shell > perl test.pl A: $ 222.42 B: $222.42
... and a test program ...sub html_space { my $Rstring = shift; $$Rstring =~ s/ / /g; }
#!/usr/bin/perl -w use strict; # every job should my $number = 222.42; $number = sprintf("\$%10.2f\n",$number); &html_space(\$number); print "A: $number\n"; sub html_space { my $Rstring = shift; $$Rstring =~ s/ / /g; }
|
|---|