Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

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]
LanX questions the integerity of this approach. ..
LanX doesn't sound natural
[LanX]: welcome to a new episode of Big Perl Theory...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (9)
As of 2018-03-20 10:34 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (250 votes). Check out past polls.