if (@kitties = $string =~ /pattern (with) captures/) {
  paw_at @kitties;
}

##</code><code>##

if ($string =~ /pattern (with) captures/) {
  paw_at $1;
}