erwtisi sxetika me perl

[zefos]

Xerei kaneis pws borw me perl na na parw ena sugkekrimeno xaraktira apo ena string?

 

px se alles glwsses ama exw ena string = "abcd" k grapcw string.chartAt(0) 8a mou dwsei a

 

efxaristw!

[random]

$a = "welcome\n";

print substr($a, 0, 1); # prints "w"

 

@ar = split(//, $a); # @ar ginetai ena array me ola ta grammata =(w,e,l,c,o,m,e)

 

 

http://www.perl.com/pub/a/2000/11/begperl2.html

http://www.unix.org.ua/orelly/perl/cookbook/ch01_06.htm

[mkst]

Η perl ειναι ιδανικη σε string manipulation. Δοκίμασε αυτό:

$str = "testing";

$result = substr($str,0,2);

Αυτό θα σου γυρισει 'te'

 

Το δευτερο ορισμα (0) ειναι το σημειο απο όπου αρχίζεις να μετράς.

Το τριτο όρισμα (2) είναι το offset (πόσους χαρακτληρες θα σου επιστρέψει)

 

Έτσι λοιπόν το

$str = "testing";

$result = substr($str,5,1);

θα γυρίσει 'n'

 

 

----------------

EDITED:

Με πρόλαβε ο φίλος random

(αυτά παθαίνεις όταν ανοίγεις (πάρα) πολλά tabs στον mozilla)

[zefos]

euxaristw!ok tin ebgala tin akri