Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re^3: Some help with my project:

by marto (Cardinal)
on Jan 17, 2017 at 14:50 UTC ( [id://1179757] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    my $testb = ( $avail / ( $avail + $used ) ) * 100;
    
    print "testa: $testa\ntestb: $testb\n";