Emeka wrote:
Hello All,
Hello,
I would like to know how to access character from string lateral.
Say I have
$foo = "From Big Brother Africa";
I would want to print each of the characters of $foo on its own.
In some languages string type is just array/list of characters. What is it
in Perl?
A string.
In Perl there are a few ways to do what you want:
$ perl -le'my $foo = "From Big Brother Africa"; print for split //, $foo'
F
r
o
m
B
i
g
B
r
o
t
h
e
r
A
f
r
i
c
a
$ perl -le'my $foo = "From Big Brother Africa"; print for $foo =~ /./sg'
F
r
o
m
B
i
g
B
r
o
t
h
e
r
A
f
r
i
c
a
$ perl -le'my $foo = "From Big Brother Africa"; print for map substr(
$foo, $_, 1 ), 0 .. length( $foo ) - 1'
F
r
o
m
B
i
g
B
r
o
t
h
e
r
A
f
r
i
c
a
$ perl -le'my $foo = "From Big Brother Africa"; print for unpack "(a)*",
$foo'
F
r
o
m
B
i
g
B
r
o
t
h
e
r
A
f
r
i
c
a
John
--
Any intelligent fool can make things bigger and
more complex... It takes a touch of genius -
and a lot of courage to move in the opposite
direction. -- Albert Einstein
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/