use warnings; use strict; use Net::Wake; Net::Wake::by_udp('XXX.XXX.XXX.XXX','00:AA:BB:CC:DD:EE');