in reply to regex minpulation
Hope that helps a bit,while (<DATA>) { next if m/.*?<.*?>/; #skip if <> exist in view my ($view) = m/\(view: (.*?)\)/; #capture view text print $view, "\n"; } __DATA__ (view: <UUID:50156b3c>) (view: seerla_golden-dev_FGPCfeature) (view: seerla_golden-dev_FGPCfe)
|
|---|