http://www.perlmonks.org?node_id=26166


in reply to Re: One for the regexp fans
in thread One for the regexp fans

Another common format for MAC address display is nnnn:nnnn:nnnn (common amongst Cisco gear, anyway).   In either case, it's the same 12 hex digits, only the delimiter and break-points change.

Is simple code that handles both formats possible?
    cheers,
    ybiC

Replies are listed 'Best First'.
RE: RE: (2) One for the regexp fans (nnnn:nnnn:nnnn)
by nuance (Hermit) on Aug 04, 2000 at 17:19 UTC
    You could probably do something like:
    if $str =~ m!\.! {$str =~ s/(\.?[0-9a-eA-E]*)/(substr("0$1", -2))/ge;} else {$str =~ s/(:?[0-9a-eA-E]*)/(substr("0$1", -4))/ge;}

    Nuance