Perl = reg Exp - Cut info in middle

dani_cv_74 has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Perl = reg Exp - Cut info in middle by Tanktalus (Canon) on Mar 23, 2006 at 16:26 UTC
First help: How (Not) To Ask A Question Second - what have you tried? Third, this is an X-Y question: "How do I do X with Y?" Why don't you want to do X with X? You want to split on colons, and get the second field, that sounds exactly like: `my $second_field = (split /:/, $string)[1]` [download] Or maybe I'm just not reading the problem right - there's not a lot of info to go on here.	[reply] [d/l]
Re: Perl = reg Exp - Cut info in middle by davidrw (Prior) on Mar 23, 2006 at 16:23 UTC
look at perlop and perlre for the `s///` substitution .. something like: `$s =~ s/Info_to_cut//;` [download] Though using the split function might work better ... depends on your exact needs -- can you provide some real samples (input and desired output)?	[reply] [d/l] [select]
Re: Perl = reg Exp - Cut info in middle by timos (Beadle) on Mar 23, 2006 at 16:28 UTC
Of course this could be done by regex: `my $yourstring="someinfo:Info_to_cut:Take_me_off"; $yourstring=~/^.?:(.?):.*$/; $info=$1;` [download] I assumed that there are only two ':' in your string and you wanted the part between them.	[reply] [d/l]
Re^2: Perl = reg Exp - Cut info in middle by ikegami (Patriarch) on Mar 23, 2006 at 16:35 UTC
I think `$yourstring=~/^[^:]:([^:])/;` might be faster, but only a Benchmark will tell for sure.	[reply] [d/l]
A reply falls below the community's threshold of quality. You may see it by logging in.
Re: Perl = reg Exp - Cut info in middle by Melly (Chaplain) on Mar 23, 2006 at 16:26 UTC
You might need to give a larger sample of your data, but if all you are doing is trying to grab the chars between the colons, then: `$_ = 'hello_world:foo_bar:goodbye_world'; /\w+:(\w+):\w+/; print $1;` [download] Tom Melly, tom@tomandlu.co.uk	[reply] [d/l]