Log zur Basis 10

wie kann ich den Log ausrechnen ?
mit log(zahl) krieg ich den ln, aber wie schaff ich den lg ?

soweit ich weiss gibt es im POSIX Modul eine Funktion log10

das ganze sieht dann so aus:

use POSIX qw(log10);
my $log = log10(100);


Michael