> + foreach my $bridge (keys %$bridges_delete) { > + > + my (undef, $interface) = dir_glob_regex("/sys/class/net/$bridge/brif", '(tap|veth|fwpr).*'); Why 'fwpr'? Maybe you wanted to check for 'fwbr' ?