Help me Extract a MAC Address

[leehaggan]

Im trying to extract the Mac address from ifconfig eth0

$HWAddr = `ifconfig eth0`;


$HWAddr= m/([0-9a-fA-F]{0,2})[:]?([0-9a-fA-F]{0,2})[:]?([0-9a-fA-F]{0,2})[:]?([0-9a-fA-F]{0,2})[:]?([0-9a-fA-F]{0,2})[:]?([0-9a-fA-F]{0,2})/g;
But being a perl newbie im really struggling, any help much appreciated :)

LH

[hacker]

[quote=leehaggan]Im trying to extract the Mac address from ifconfig eth0

There are several modules that do this in CPAN. Look in Net::Packet::Utils for starters.

Peace,
Hacker

[Dflanigan]

Here is a quick script I chruned out. It could be neatened up a bit, naturally, but should get you where you want to go.

#!/usr/bin/perl
$ifconfigin= `/sbin/ifconfig eth0`;
@ifeth = split(/\n/, $ifconfigin);
($junk,$macaddr) = split(/ HWaddr /, $ifeth[0]);
print "$macaddr\n";

Dave
http://www.flanigan.net