I've had much much happy success using Math::BaseCnv and its simply the easiest thing to use...

use Math::BaseCnv;

my $your_number = 55;

# cnv( THE-NUMBER, OLD-BASE, NEW-BASE );
my $new_number = cnv( $your_number, 10, 3 );

# $new_number becomes 2001
[download]

Hope this helps - good luck,
  -Adam