Re^3: How do I cut single characters out of a string

Ok I see what you did there
Now say I want the ability to grab any character out of the hole string given the position of it.

Such as mystring123456 so when I find the length of it with length(), so 14 characters. Is there a way I can tell it I want the 6th and 7th characters. Or then just grab the 9th character.

#not actual code more just a logical walk through
if(the string has 20 characters){
     Get the 9th character;
     Get the characters 6-8;
}elsif(the string has 14 characters){
     Get the 6th character from the end;
     Get the last 4 characters from the end;
}

Sorry if this looks ugly but sometimes it helps me think through things like this.

Comment on Re^3: How do I cut single characters out of a string

Replies are listed 'Best First'.
Re^4: How do I cut single characters out of a string by GrandFather (Saint) on Jan 16, 2012 at 10:40 UTC
Read some of the earlier replies you received. The short version is: use substr. True laziness is hard work	[reply]
Re^4: How do I cut single characters out of a string by tobyink (Canon) on Jan 16, 2012 at 10:49 UTC
TIMTOWTDI but: `use Modern::Perl; use Data::Dumper; my $dispatch = { 20 => sub { ( substr($_, 8, 1), substr($_, 5, 3) ) }, 14 => sub { ( substr($_, -6, 1), substr($_, -4, 4) ) }, }; my $string = 'mystring123456'; if (my $code = $dispatch->{ length $string }) { local $_ = $string; my @get = $code->(); print Dumper \@get; }` [download]	[reply] [d/l]