} elsif ( $type eq 'checkbox' ) {
$value = $value eq 'Y' ? emt('Yes') : emt('No');
} elsif ( $type =~ /(input-)?mac_addr/ and $value =~ /\w/) {
- my $vendor = Net::MAC::Vendor::lookup($value)->[0];
- $value .= " ($vendor)" if $vendor;
+ my $vendor = Net::MAC::Vendor::lookup($value);
+ $value .= ' ('. $vendor->[0]. ')' if $vendor;
$value = $m->scomp('/elements/mac_addr.html', $value);
}
<% $td %><% $device->part_device->devicename |h %></TD>
% }
<% $td %><% $device->mac_addr_pretty %>
- (<% (Net::MAC::Vendor::lookup($device->mac_addr_formatted('U',':')))->[0] %>)
+% my $vendor = Net::MAC::Vendor::lookup($device->mac_addr_formatted('U',':'));
+ (<% $vendor ? $vendor->[0] : '' %>)
</TD>
<% $td %><% $export_links %></TD>
<% $td %>(
% ) / 1073741824;
%
% my $last_mac = $svc->attribute_last_sqlradacct( 'CallingStationId' );
-% if ( $last_mac =~ /^\s*(([\dA-F]{2}[\-:]){5}[\dA-F]{2})/i ) {
-% $last_mac .= ' ('. (Net::MAC::Vendor::lookup($1))->[0]. ')';
+% if ( $last_mac =~ /^\s*(([\dA-F]{2}[\-:]){5}[\dA-F]{2})/i
+% && my $vendor = Net::MAC::Vendor::lookup($1)
+% )
+% {
+% $last_mac .= ' ('. $vendor->[0]. ')';
% }