Help for this page
sub get_regexp { if ($blah) ... elsif ($blahblah) $regexp = qr {}; }
$REGEXP = get_regexp($ip); ($circuit_id) = $if_descr =~ $REGEXP;