Re: string indexing

Bob Ackerman wrote:
> 
> I am used to indexing a string in other languages, so i would like to say
> $x="abcd";
> print $x[3];
> and see 'd' printed, but, of course, this isn't correct in perl.
> 
> so i did
> @y=split(//,"abcd");
> print $y[2],"\n";
> 
> and that's fine.
> 
> now, how do i do that without an intermediate array.
> i want to say
> print split(//,"abcd")[1],"\n";
> 
> but i get compilation error.
> 
> or is there some built-in way to index a string?

You need parenthesis to get a list context for the [1] to work, so:

print( (split(//, "abcd"))[1], "\n");

Or:
print( (split //, "abcd")[1], "\n");

Or:
print +(split //, "abcd")[1], "\n";

Or:
print substr("abcd", 1, 1), "\n";

Or:
print unpack("xa", "abcd"), "\n";



John
-- 
use Perl;
program
fulfillment

• reading one character at a time by richard noel fell
• RE: reading one character at a time by Timothy Johnson
• RE: reading one character at a time by Timothy Johnson
• RE: reading one character at a time by Jonathan E. Paton
• RE: reading one character at a time by Nikola Janceski
• RE: reading one character at a time by Jonathan E. Paton
• RE: reading one character at a time by Jason Larson
• Re: reading one character at a time by Shawn
• string indexing by bob ackerman
• Re: string indexing by John W. Krahn
• Re: string indexing by bob ackerman
• Re: string indexing by John W. Krahn