Tekstiviesti: Perl: