in reply to Regex negation (or golf)
Output:#!/usr/bin/perl -w use strict; use Data::Dumper; my $text = '"F059"3,"Invalid Recipient postal code format for specifie +d country."99,""'; my @text = split /"/, $text; print Dumper(\@text); print $text[3];
$VAR1 = [ '', 'F059', '3,', 'Invalid Recipient postal code format for specified country. +', '99,' ]; Invalid Recipient postal code format for specified country.
|
|---|