MAC vendor lookup: Difference between revisions
→{{header|Logo}}: Add implementation
(→{{header|APL}}: move demo code into program instead of output section) |
(→{{header|Logo}}: Add implementation) |
||
Line 722:
Apple, Inc.
</pre>
=={{header|Logo}}==
{{works with|UCB Logo}}
<lang logo>make "api_root "http://api.macvendors.com/
make "mac_list [88:53:2E:67:07:BE D4:F4:6F:C9:EF:8D FC:FB:FB:01:FA:21
4c:72:b9:56:fe:bc 00-14-22-01-23-45]
to lookup_vendor :mac
output first shell (sentence [curl -s] (word :api_root :mac) [&& echo])
end
foreach :mac_list [
print lookup_vendor ?
wait 90
]
bye</lang>
{{Out}}
<pre>Intel Corporate
Apple, Inc.
Cisco Systems, Inc
PEGATRON CORPORATION
Dell Inc.</pre>
=={{header|Lua}}==
| |||