robert wrote:
s/([^]+) ([^]+)/$1\000$2/g;
holy cow. can you explain that substitution? my brain just about
popped.
It's just replacing the blank/space between two words with a binary 0
and losing the quotes.
Lyle didn't like that one cause it didn't handle mult spaces.
Here's
-Original Message-
From: $Bill Luebkert
Sent: Monday, July 25, 2005 11:42 PM
robert wrote:
s/([^]+) ([^]+)/$1\000$2/g;
holy cow. can you explain that substitution? my brain just about
popped.
It's just replacing the blank/space between two words with a
binary
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA512
Thanks for all the replies.
I'm tesing the Text::ParseWords
I'm new in Perl and I'm a little bit confused with the PATTERNS
option but I'm learning it.
Is this code good for checking valid date in the format -MM-DD?
or do you have any other
Michael Louie Loria wrote:
I'm tesing the Text::ParseWords
I'm new in Perl and I'm a little bit confused with the PATTERNS
option but I'm learning it.
Is this code good for checking valid date in the format -MM-DD?
or do you have any other suggestions
What's with the ~'s starting
$Bill Luebkert wrote:
Michael Louie Loria wrote:
I'm tesing the Text::ParseWords
I'm new in Perl and I'm a little bit confused with the PATTERNS
option but I'm learning it.
Is this code good for checking valid date in the format -MM-DD?
or do you have any other suggestions
What's
I have a problem with the split function.
string
- - -
one two three four five six seven
should be split to
- - -
one
two three
four five
six
seven
I seem to recall seeing this a long time ago done in a one-liner using eval.
Anyone remember that?
http://search.cpan.org/~nwclark/perl-5.8.7/lib/Text/ParseWords.pm
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
Michael Louie Loria
Sent: Monday, July 25, 2005 9:57 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: Split function in Perl
-Original Message-
From: $Bill Luebkert
Sent: Monday, July 25, 2005 9:30 PM
s/([^]+) ([^]+)/$1\000$2/g;
holy cow. can you explain that substitution? my brain just about
popped.
my @a = split / +/;
foreach (@a) {
s/\000/ /g; # restore embedded
I would like to split on either a double dash or a semi colon with one
split using ( | ).
$_ = 'Hello-world;how--are--you;today';
print join \n, split /--|;/;
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe:
:20 PM
To: [EMAIL PROTECTED]
Subject: Re: Split function
I would like to split on either a double dash or a semi colon with one
split using ( | ).
$_ = 'Hello-world;how--are--you;today';
print join \n, split /--|;/;
___
Perl-Win32-Users mailing list
Mangesh Paranjape wrote:
Forwarded on behalf of Moshe:
I would like to know if this is OK?
@array = split(/(--|;)/,$var);
I would like to split on either a double dash or a semi colon with one
split using ( | ).
Is that viable, or do I have to test for either one, and split
Would it be only semantic to escape the semicolon, or could it cause a
problem not to do so? I'm not asking to be picky, I really don't know. :)
The semi-colon is not special unless you do something like this:
m;foo|bar|\;;
___
Perl-Win32-Users
12 matches
Mail list logo