Find text between two strings?

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

Replies are listed 'Best First'.
Re: Find text between two strings? by Joost (Canon) on Jul 12, 2005 at 16:22 UTC
I recommend you read the regex tutorial. It could be something like this (precise form of regex depends on the interpretation of your question, please read the link): `my $input = "foodogbar"; my ($thing) = $input =~ /foo(.?)bar/;` [download] "What should it profit a man, if he should win a flame war, yet lose his cool?"*	[reply] [d/l]
Re: Find text between two strings? by fmerges (Chaplain) on Jul 12, 2005 at 16:27 UTC
Hi, As Joost said, read the tutorial and also perlre. Using word boundaries should be a addon, so: `my ($thing) = $input =~ /\bfoo(.*?)bar\b/;` [download] Regards, \|fire\| at irc.freenode.net I like merlyn's disclaimer	[reply] [d/l]
Re: Find text between two strings? by calin (Deacon) on Jul 12, 2005 at 21:21 UTC
Consider the following string: foofooxxxbarbar Then what constitutes the text between "foo" and "bar"? xxx fooxxxbar fooxxx xxxbar ?	[reply]
Re: Find text between two strings? by artist (Parson) on Jul 12, 2005 at 16:24 UTC
`($variable) = $string =~ /foo(.*?)bar/;` [download] --Artist	[reply] [d/l]
Re: Find text between two strings? by Smylers (Pilgrim) on Jul 12, 2005 at 16:25 UTC
`foreach (qw<foocatbar foodogbar foonullooops>) { if (/foo(.*)bar/) { print "$1\n"; } else { print "not found in $_\n"; } }` [download] Smylers	[reply] [d/l]