Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
  print "$lastIP\n\n" if /Monitored circuits:/ and defined $lastIP;
  $lastIP = $1 if /((\d{1,3}\.){3}\d{1,3})/;
}
  2. or download this
    __DATA__
Network name A
...
            135.51.05.22
        Monitored circuits:
            vbgghdfgdfg
  3. or download this
    Network name A
        VRID 145
...
        Primary address:    19.51.205.20
135.51.05.22