konwersja napisu na numer telefonu

Chciałem poszukać sobie numeru komórki który będzie jakimś fajnym napisem. Nie chciało mi się tego napisu „konwertować” patrząc na klawiaturę telefonu. Nie chciało jak diabli. #!/usr/bin/perl -w use strict; if ( @ARGV ) { my $number = ''; foreach my $o ( @ARGV ) { print $o; my @data = split '', '22233344455566677778889999'; map { my $c … Czytaj dalej konwersja napisu na numer telefonu