/[pxelator]/lib/PXElator/client.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/client.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 164 by dpavlin, Thu Aug 6 18:43:55 2009 UTC revision 165 by dpavlin, Thu Aug 6 18:51:57 2009 UTC
# Line 39  sub conf { Line 39  sub conf {
39          return $value;          return $value;
40  }  }
41    
42    sub mac {
43            my $ip = shift;
44            my $mac = client::conf( $ip, 'mac' );
45            $mac =~ s{(..)}{$1:}g;
46            $mac =~ s{:$}{};
47            $mac = qq|<tt>$mac</tt>| if (caller(1))[3] =~ m{^httpd};
48            return uc($mac);
49    }
50    
51  1;  1;
Legend:
Removed from v.164  
changed lines
  Added in v.165
  ViewVC Help
Powered by ViewVC 1.1.26