Sponsored Content
Top Forums Shell Programming and Scripting Rounding off decimals to the nearest number in PERL Post 302301942 by rdlover on Sunday 29th of March 2009 11:12:53 AM
Old 03-29-2009
Thanks Rikxik! I guess that's gonna work! I am trying to write a logical if else statement in Perl to use the 'ceil' and 'floor' functions , but my novice programming skills is hampering the progress!

This is what i am trying to accomplish , if the value of a variable $nSlice is a number greater than .5 (ex : 23.5 or 16.8 or 17.9 etc), ceil that number,else floor that number. Any suggestions or help would be appreciated. Thanks again!
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Rounding off to the next whole number

Hello, I searched a lot on this Forum. Please help me with the below problem. I want to divide two numbers and the result should be the next nearest whole number. E.G. Dividing 10.8/5 ideally gives 2.16. But the result should be 3 i.e. rounded off to the next whole number. Any help will... (2 Replies)
Discussion started by: damansingh
2 Replies

2. Shell Programming and Scripting

removing and rounding up decimals

Hi Experts, I have a command that gives me the output as below root@ckpgpay11core> cat sara | awk '{ sum += $1} ; END { print sum }' | awk {'print $1/90'} 8.88889 how do i remove the decimal spaces so that the figure will round itself to 9? Thanks. (3 Replies)
Discussion started by: aismann
3 Replies

3. Shell Programming and Scripting

convert Regular decimals to Packed decimals

Hi, I am trying to find if there is a way to convert regular decimal values to Paced decimal values. I tried to find a c program but I could get a Packed converted to regular decimal not the other way round. If not unix please let me know if any other progrimming language I can use to do... (2 Replies)
Discussion started by: mgirinath
2 Replies

4. Shell Programming and Scripting

rounding time in perl

Is there a way I can round time in perl to the nearest five minutes? For example if I have log giving the following time stamps 23,52,30 it would rounded up to 23,55,00 and 23,50,01 would be rounded to 23,50,00 (3 Replies)
Discussion started by: borderblaster
3 Replies

5. Shell Programming and Scripting

PERL - rounding fractional number

It seems that perl sprintf uses the round-to-even method: foreach my $i ( 0.5, 1.5, 2.5, 3.5 ) { printf "$i -> %.0f\n", $i; } __END__ 0.5 -> 0 1.5 -> 2 2.5 -> 2 3.5 -> 4 4.5 -> 4 Where we probably wants to use round-half-up, i.e. output should be as below: 0.5 -> 1 1.5 -> 2... (8 Replies)
Discussion started by: ganapati
8 Replies

6. Shell Programming and Scripting

AWK Match to nearest number

Hello Guys, I'm very new on here and require some help matching up and printing some columns using awk. I have two text files. The first file has Longitude data in column 1 (lon.txt) and the second one (node.txt) has again another Longitude data in column 1 (not exact as the first one) + in... (7 Replies)
Discussion started by: ian_gooch
7 Replies

7. Shell Programming and Scripting

Rounding number, but....

Dear Experts, I'm trying to find a way to round a number but in this way: 14367.577 ---> 14000 I used the following to round the number to the closer integer: echo $var|awk '{print int($1+0.5)}' and also: xargs printf "%1.0f" However, they don't work for my above... (9 Replies)
Discussion started by: Gery
9 Replies

8. UNIX for Dummies Questions & Answers

Rounding up to nearest whole number

Hi all of you, Would be great if you help me with how to round up to whole number from my input values like 2.99996,2.17890,3.00002,-2.3456,-2.7890 o/p should be like 3,2,3,-2,-3 thnks in adv!!!! regards (3 Replies)
Discussion started by: Indra2011
3 Replies

9. Shell Programming and Scripting

Rounding off to the nearest floating number

I have a number, which I want to convert into the nearest floating number upto two places after the decimal point. E.g. 1.2346 will become 1.23 but 1.2356 will become 1.24 . Similarly 0.009 will be 0.01 and 0.001 will be 0.00 or 0.0 (not 0, wnat to keep the decimal... (1 Reply)
Discussion started by: hbar
1 Replies

10. Shell Programming and Scripting

[awk] rounding a float number?

Heyas Trying to calculate the total size of a file by reading its bitrate. Code snippet: fs_expected() { # # Returns the expected filesize in bytes # pr_str() { ff=$(cat $TMP.info) d="${ff#*bitrate: }" echo "${d%%,*}" | $AWK '{print $1}' | head -n 1 } t_BYTERATE=$((... (9 Replies)
Discussion started by: sea
9 Replies
Format::Human::Bytes(3pm)				User Contributed Perl Documentation				 Format::Human::Bytes(3pm)

NAME
Format::Human::Bytes - Format a bytecount and make it human readable VERSION
Version 0.05 SYNOPSIS
Ever showed 12345678 bytes to the user instead of just saying 11MB? This module returns you a printable string which is more readable by humans than a simple bytecount. use Format::Human::Bytes; $readable = Format::Human::Bytes::base2($bytecount[,$decimals]); $readable = Format::Human::Bytes::base10($bytecount[,$decimals]); $readable = Format::Human::Bytes->base2($bytecount[,$decimals]); $readable = Format::Human::Bytes->base10($bytecount[,$decimals]); my $fhb = Format::Human::Bytes->new(); $readable = $fhb->base2($bytecount[,$decimals]); $readable = $fhb->base10($bytecount[,$decimals]); All functions do "intelligent" switching to the next unit, for example: 1000 => 1000B [...] 8000 => 8000B 9000 => 9kB The difference between 1000 bytes and 1500 bytes is usually bigger (for example because of a slow link) than between 95kB and 95,5kB. The same applies to 8000kB vs. 9 MB and for the other units. Depending on your usage, you may want to specify how many decimals should be shown (defaults to no decimals). FUNCTIONS
/ METHODS new my $fhb = Format::Human::Bytes->new(); Creates and returns a Format::Human::Bytes - object. base2 Callable as a function: $readable = Format::Human::Bytes::base2($bytecount[,$decimals]); Callable as a class method: $readable = Format::Human::Bytes->base2($bytecount[,$decimals]); Callable as a object method: $readable = $fhb->base2($bytecount[,$decimals]); Returns the correct readable form of the given bytecount. Correct in this case means that 1kB are 1024 Bytes which is how computers see the world. If you specify a decimal parameter, the result number will have the number of decimal numbers you specified. base10 Callable as a function: $readable = Format::Human::Bytes::base10($bytecount[,$decimals]); Callable as a class method: $readable = Format::Human::Bytes->base10($bytecount[,$decimals]); Callable as a object method: $readable = $fhb->base10($bytecount[,$decimals]); Returns the incorrect readable form of the given bytecount. Incorrect in this case means that 1kB is 1000 Bytes and 1 MB is 1000000 bytes which is how some (many) people see the world, but it's wrong for computers. If you specify a decimal parameter, the result number will have the number of decimal numbers you specified. AUTHOR
Sebastian Willing, "<sewi at cpan.org>" BUGS
Please report any bugs or feature requests to "bug-format-human-bytes at rt.cpan.org", or through the web interface at <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Format-Human-Bytes>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. SUPPORT
You can find documentation for this module with the perldoc command. perldoc Format::Human::Bytes You can also look for information at: o RT: CPAN's request tracker <http://rt.cpan.org/NoAuth/Bugs.html?Dist=Format-Human-Bytes> o AnnoCPAN: Annotated CPAN documentation <http://annocpan.org/dist/Format-Human-Bytes> o CPAN Ratings <http://cpanratings.perl.org/d/Format-Human-Bytes> o Search CPAN <http://search.cpan.org/dist/Format-Human-Bytes/> HISTORY
The functions are in use since late 2003 or early 2004 but I didn't pack them for CPAN before 2009. LICENSE
This program is free software; you can redistribute it and/or modify it under the same terms as Perl 5 itself. perl v5.10.1 2010-04-08 Format::Human::Bytes(3pm)
All times are GMT -4. The time now is 06:02 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy