open FILE, "regex" or die "Couldn't open: $!";
while (<FILE>) {
  if ( $ENV{"REDIRECT_URL"} +~ /$_/ ) { print $_; last; }
}
close FILE;