
use Lingua::DE::Num2Word;
my $text = Lingua::DE::Num2Word::num2de_cardinal( w );

print $text || "sorry, can't convert this number into german language.";
