in reply to Obtain CSV Fiile from text

$var1='3,"2014-02-19 14:29:05","Extracted 1 Unfulfilled Reconciliation
+ records into /opt/mysql/backup/recon/201312/input/UNFULFILLED_RECONC
+ILIATION_20130225.CSV","URECONCILIATION"';
$var1 =~ /( [A-Za-z0-9_\/]+\.CSV)/ ;
print "$1\n";

[download]
As above, use 'i' switch on regex if eg CSV or csv or ...

Replies are listed 'Best First'.
Re^2: Obtain CSV Fiile from text
by Anonymous Monk on Mar 07, 2014 at 04:01 UTC
    Appending to myself re case insensitive 
    $var1='3,"2014-02-19 14:29:05","Extracted 1 Unfulfilled Reconciliation
+ records into /opt/mysql/backup/recon/201312/input/UNFULFILLED_RECONC
+ILIATION_20130225.csv","URECONCILIATION"';
$var1 =~ /( [a-z0-9_\/]+\.CSV)/i ;
print "$1\n";

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom