12345678910111213
root@svr2 ~ # cat t.pl#!/usr/bin/perluse strict;use warnings;my $name_netzwerkkarte = 'eth0';my $MAC_Adresse = `ifconfig "$name_netzwerkkarte" | grep co`;print $MAC_Adresse;root@svr2 ~ # perl t.pl inet6 addr: fe80::8e89:a5ff:fe2b:a31/64 Scope:Link collisions:0 txqueuelen:1000root@svr2 ~ #