#!/usr/bin/perl
use strict;
use warnings;
require Net::Wake;

Net::Wake::by_udp('192.168.0.255', '00:08:9B:E1:0A:10') or die "Fehler '$!'";