Opened by monetron at 2004-01-23 16:13
User since
2003-08-04
5875 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5875 Artikel
ModeratorIn
[quote=DS,23.01.2004, 16:54]$match = ($line =~ /^-- (\d+)/);[/quote]
Obwohl das geht, würd ich Anfängern doch lieber
($match) = $line =~ /^-- (\d+)/;
nahebringen wollen...
Und außerdem (don't use / if / or \ is in your RE) ist
($match) = $line =~ m~^-- (\d+)~;
schöner, imho.
Obwohl das geht, würd ich Anfängern doch lieber
($match) = $line =~ /^-- (\d+)/;
nahebringen wollen...
Und außerdem (don't use / if / or \ is in your RE) ist
($match) = $line =~ m~^-- (\d+)~;
schöner, imho.
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
use strict; use warnings; Link zu meiner Perlseite
use strict; use warnings; Link zu meiner Perlseite