Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re^2: grep ip address from dhcpd.leases file

by varalaxmibbnl (Acolyte)
on Dec 15, 2013 at 07:40 UTC ( #1067212=note: print w/ replies, xml ) Need Help??


in reply to Re: grep ip address from dhcpd.leases file
in thread grep ip address from dhcpd.leases file

thanks for the reply..if i want to take the present ip address which are entering into that dhcp.leases then is there any module to do that...thanks in advance..
  • Comment on Re^2: grep ip address from dhcpd.leases file

Replies are listed 'Best First'.
Re^3: grep ip address from dhcpd.leases file
by Kenosis (Priest) on Dec 15, 2013 at 17:22 UTC

    Provided you have read permissions for dhcp.leases, just use that file as your data source in the above script:

    use strict; use warnings; local $/ = 'lease'; my $leaseFile = '/var/lib/dhcp3/dhcpd.leases'; open my $fh, '<', $leaseFile or die $!; while (<$fh>) { my ($ip) = /\s+(\S+)\s+/ or next; my $client = /client-hostname\s+(".+")/ ? $1 : ''; print "$ip,$client\n"; } close $fh;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1067212]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2016-06-25 16:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My preferred method of making French fries (chips) is in a ...











    Results (326 votes). Check out past polls.