if (my @matches = $var =~ /PATTERN/) {
    # match
}
else {
    # did not match
}