Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: Re: /o is dead, long live qr//!

by diotalevi (Canon)
on Jun 26, 2003 at 12:08 UTC ( #269206=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use constant FOO => 'bar';
    my $x = FOO;
    $x = qr/$x/;
    
    "somehting" =~ $x
    
  2. or download this
    our $FOO = 'bar';
    my $x = qr/$FOO/;
    
    "something" =~ $x;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://269206]
help
Chatterbox?
[ovedpo15]: consider the following format of strings: some_data-doesn't- matter,value. how I get the value with regex? it should be after the last comma (last string)
[Corion]: Text::CSV_XS for all your CSV file parsing needs. Other than that, what problems do you have with perlre, and capturing everything after the comma? Also, index and substr would also work.
[choroba]: my ($value) = $string =~ /.*,(.*)/
[choroba]: The .* at the beginning matches the longest possible substring, so it eats any previous commas
[choroba]: But for CSV, use appropriate modules

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (6)
As of 2018-05-27 08:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?