Changeset 8f654de for fedkit/gateway_lib.pm
- Timestamp:
- Jan 18, 2013 3:30:52 PM (12 years ago)
- Branches:
- master
- Children:
- dcac546
- Parents:
- 5e71d34
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
fedkit/gateway_lib.pm
r5e71d34 r8f654de 32 32 my $BRCTL = "/usr/sbin/brctl"; 33 33 my $IPROUTE = "/sbin/ip route "; 34 35 $BRCTL = '/sbin/brctl' unless -x $BRCTL ; 34 36 35 37 # Takes an ssh config file and a reference to a hash of keys whose values must … … 285 287 $ipipe->reader("$IFCONFIG"); 286 288 while(<$ipipe>) { 287 /^([[:alnum:]]+): / && do {289 /^([[:alnum:]]+):?/ && do { 288 290 $iface = $1; 289 291 next; 290 292 }; 291 /inet \s+([0-9\.]+)/ && do {292 if ($ 1eq $addr) {293 /inet(\s+addr:)?\s*([0-9\.]+)/ && do { 294 if ($2 eq $addr) { 293 295 $ipipe->close(); 294 296 return $iface;
Note: See TracChangeset
for help on using the changeset viewer.