jablonka.czprosek.czf

hotsanic

Subversion Repositories:
[/] [trunk/] [modules/] [fiber-100g/] [platform/] [a.pl] - Rev 34 Go to most recent revision

Compare with Previous - Blame - Download


#!/usr/bin/env perl
use strict;
use warnings;
use diagnostics;

my $var=19876*0.0000001;
print "$var\n";

my $power = 10* log(1000*$var)/log(10);

print $power;


Powered by WebSVN 2.2.1