APRS beacon sender in Perl