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