Parent Directory | Revision Log
added ip::devices_up and use it for wireshark to offer sniffing targets
1 | package wireshark; |
2 | |
3 | use warnings; |
4 | use strict; |
5 | |
6 | use ip; |
7 | |
8 | sub fork_actions { ip::devices_up } |
9 | |
10 | our $AUTOLOAD; |
11 | |
12 | sub AUTOLOAD { |
13 | my $name = $AUTOLOAD; |
14 | $name =~ s/.*://; # strip fully-qualified portion |
15 | |
16 | warn "# $name"; |
17 | |
18 | exec "wireshark -k -i $name"; |
19 | } |
20 | |
21 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |