my $re = qr{^yikes}i;
your_sub($re, $other, $arguments);