package Foo::Bar;

use Regexp::Assemble;

our $VERSION = '0.01';
our $regex = Regexp::Assemble->new->add( 'some-stuff' )->re;

sub function {
...
	$var =~ $regex;
}