#!/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; WebSVN - hotsanic - Blame - Rev 33 - /trunk/modules/fiber-100g/platform/a.pl

hotsanic

Subversion Repositories:

[/] [trunk/] [modules/] [fiber-100g/] [platform/] [a.pl] - Blame information for rev 33

Line No.	Rev	Author	Line