Pasre sign between quotes

Dev Shed Forums Sponsor:

December 29th, 2008, 07:55 AM

umbrella

Contributing User

Join Date: Oct 2008

Posts: 85

Time spent in forums: 23 h 38 m 31 sec
Reputation Power: 5

Pasre sign between quotes

g'day everybody.
I've got few lines, for example

Code:

set = str("\nUser-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)");
set = str("User-Agent: Mozilla/4.0", "(compatible; MSIE 6.0; Windows NT 5.0)");

And I need rexexp value so as to take it from array in perl...
$_[0] =~ s/....../
I just need take value between " "(quotes)
currently I use perl.

December 29th, 2008, 08:26 AM

prometheuzz

User 165270

Join Date: Oct 2005

Posts: 497

Time spent in forums: 5 Days 10 h 14 m 35 sec
Reputation Power: 936

It is not clear to me what you want to do exactly.
How can your "few lines" look like? The first just has one pair of quotes in it, while the second has two pairs of quotes.
Are you processing the in put line by line or are your two examples stored in one string?
Have you already tried something yourself? If so, could you post that as well: that way you might learn from your mistakes if someone points out the error in your code.

December 29th, 2008, 08:26 AM

OmegaZero

Contributing User

Join Date: May 2007

Posts: 738

Time spent in forums: 3 Weeks 5 Days 6 h 5 m 21 sec
Reputation Power: 928

Using Perl, the easiest way would be to use Text::Balanced (which comes with perl) or Regexp::Common to do the dirty work for you.

__________________
sub{*{$::{$_}}{CODE}==$_[0]&& print for(%:: )}->(\&Meh);

December 29th, 2008, 08:51 AM

umbrella

Contributing User

Join Date: Oct 2008

Posts: 85

Time spent in forums: 23 h 38 m 31 sec
Reputation Power: 5

yes, i use Text::Balanced within any string parse, but I don't simply which to do it very fun work. It two strings I might take from <stdin> my script from any input char and I want take all value between quotes from everyone string to variable. I can read any other lines very well, but on that lines I stand confused. So, which to pass quotes and have got text between quotes per string in variable?

January 8th, 2009, 09:12 PM

baddy

Salaryman

Join Date: Jul 2002

Location: St. Louis, MO

Posts: 341

Time spent in forums: 3 Days 3 h 48 m 44 sec
Reputation Power: 69

Quote:

Originally Posted by umbrella

I just need take value between " "(quotes)
currently I use perl.

Code:

if ($subject =~ m/(?<=").*(?=")/i) {
	# Successful match
	
	# show whats between quotes
	print $0; 
} else {
	# Match attempt failed
}

January 17th, 2009, 08:52 PM

umbrella

Contributing User

Join Date: Oct 2008

Posts: 85

Time spent in forums: 23 h 38 m 31 sec
Reputation Power: 5

thanks for reply, but it doesn't work...

Code:

# echo 'set = str("\nUser-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)");' | perl -e 'while(<>){$_ =~ m/(?<=").*(?=")/i;print $_;}'
set = str("\nUser-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)");

I'm anticipate something like on it..
"\nUser-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"

Pasre sign between quotes

Developer Shed Advertisers and Affiliates