use v5; use strict; use feature 'say'; our $1; if ("abc" =~ m/(a)/ ) { say "Match: ", $1; }