Two methods.

print "OK" if m((?i:var)=/bin);
[download]

and

my $m_var = qr/var/i;
print "OK" if m($m_var=/bin);
[download]

The first is faster for building one RE. The second if you need a series of them.