|
Тема |
tr/// v reverse() |
|
Автор | ddfd (Нерегистриран) | |
Публикувано | 26.06.03 03:17 |
|
|
Nqkoj mozhe li da mi objasni zashto se poluchava tova (udebelil sum go):
$ perl -d -e 0
Loading DB routines from perl5db.pl version 1.19
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
main::(-e:1): 0
DB<1> $test_str1 = "adfsaishashkjahjjhkn"
DB<2> print $test_str1;
adfsaishashkjahjjhkn
DB<3> $test_str2=reverse($test_str1=~tr/a-z/A-Z/);
DB<4> print $test_str2;
02
DB<5> print $test_str1;
ADFSAISHASHKJAHJJHKN
DB<6> $test_str3=reverse($test_str1);
DB<7> print $test_str3
NKHJJHAJKHSAHSIASFDA
|
| |
|
|
|