Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"

Re: Rounding with sprintf and -0

by Khen1950fx (Canon)
on Apr 07, 2013 at 06:55 UTC ( #1027330=note: print w/replies, xml ) Need Help??

in reply to Rounding with sprintf and -0

Since you just want an unsigned 0, use %u and String::Sprintf:
#!/usr/bin/perl -l use strict; use warnings; use String::Sprintf; my $formatter = String::Sprintf->formatter( F => sub { my($width, $value, $values, $letter) = @_; my $s = sprintf "%${'width'}f", $value; $s =~ s/\.?0*$//; return $s; } ); print $formatter->sprintf( "%u", -0.5 );

Replies are listed 'Best First'.
Re^2: Rounding with sprintf and -0
by Anonymous Monk on Apr 07, 2013 at 07:17 UTC

    and String::Sprintf:

    No Khen1950fx , even sprintf has %u, not that you need to sprintf twice

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1027330]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (5)
As of 2016-10-22 12:11 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (294 votes). Check out past polls.