Pastable version of MAC Formatting

<div style="overflow:auto;border:solid 1px #ccc;background:#000;color:#F8F8F8">
          <div class="section">
            
            <pre style="float:left;margin:0 10px;border-right:0;color:#666;">1
2
3
4
5
6
7
8
9
10
11
12
13
14
15</pre>
            <pre class="sunburst"><span style="color:#AEAEAE;font-style:italic;"><span style="color:#AEAEAE;font-style:italic;">#</span>!/usr/bin/perl</span>
<span style="color:#E28964;">use</span> strict;
<span style="color:#E28964;">use</span> warnings;

<span style="color:#AEAEAE;font-style:italic;"><span style="color:#AEAEAE;font-style:italic;">#</span> sample snmp return</span>
<span style="color:#99CF50;">my</span> <span style="color:#3E87E3;"><span style="color:#3E87E3;">$</span>mac_address</span> = <span style="color:#65B042;"><span style="color:#65B042;">'</span>0x001617479a5e<span style="color:#65B042;">'</span></span>;

<span style="color:#DAD085;">print</span> <span style="color:#65B042;"><span style="color:#65B042;">qq{</span>Original MAC Address: <span style="color:#8A9A95;"><span style="color:#8A9A95;">$</span>mac_address</span><span style="color:#DDF2A4;">\n</span><span style="color:#65B042;">}</span></span>;

<span style="color:#AEAEAE;font-style:italic;"><span style="color:#AEAEAE;font-style:italic;">#</span> reformat the address as a standard MAC</span>
<span style="color:#3E87E3;"><span style="color:#3E87E3;">$</span>mac_address</span> =~ <span style="color:#E9C062;"><span style="color:#E9C062;"><span style="color:#DAD085;">s</span>/</span><span style="color:#CF7D34;">\A</span>..</span><span style="color:#E9C062;"><span style="color:#E9C062;">/</span><span style="color:#E9C062;">/</span></span><span style="color:#E9C062;"><span style="color:#E9C062;"><span style="color:#E28964;">xms</span></span></span>;     <span style="color:#AEAEAE;font-style:italic;"><span style="color:#AEAEAE;font-style:italic;">#</span> remove the 0x</span>
<span style="color:#3E87E3;"><span style="color:#3E87E3;">$</span>mac_address</span> =~ <span style="color:#E9C062;"><span style="color:#E9C062;"><span style="color:#DAD085;">s</span>/</span>(..)</span><span style="color:#E9C062;"><span style="color:#E9C062;">/</span><span style="color:#8A9A95;"><span style="color:#8A9A95;">$</span>1</span>:<span style="color:#E9C062;">/</span></span><span style="color:#E9C062;"><span style="color:#E9C062;"><span style="color:#E28964;">g</span></span></span>;    <span style="color:#AEAEAE;font-style:italic;"><span style="color:#AEAEAE;font-style:italic;">#</span> add a colon between bytes</span>
<span style="color:#3E87E3;"><span style="color:#3E87E3;">$</span>mac_address</span> =~ <span style="color:#E9C062;"><span style="color:#E9C062;"><span style="color:#DAD085;">s</span>/</span>:$</span><span style="color:#E9C062;"><span style="color:#E9C062;">/</span><span style="color:#E9C062;">/</span></span>;          <span style="color:#AEAEAE;font-style:italic;"><span style="color:#AEAEAE;font-style:italic;">#</span> remove the trailing :</span>

<span style="color:#DAD085;">print</span> <span style="color:#65B042;"><span style="color:#65B042;">qq{</span>Reformatted MAC Address: <span style="color:#8A9A95;"><span style="color:#8A9A95;">$</span>mac_address</span><span style="color:#DDF2A4;">\n</span><span style="color:#65B042;">}</span></span>;
</pre>
          </div>
        </div>

<a href="http://refactormycode.com/codes/390-mac-formatting" style="color:#fff" title="As seen on RefactorMyCode.com"><img alt="Small_logo" src="http://refactormycode.com/images/small_logo.gif" style="border:0" /></a>

counter free hit invisible