<html>
  <head>
    <meta content="text/html; charset=ISO-8859-1"
      http-equiv="Content-Type">
  </head>
  <body text="#000000" bgcolor="#FFFFFF">
    <div class="moz-cite-prefix">That might work, but it's not a fully
      functioning IGate.  Even without a filter, the APRS-IS server will
      be sending you data that will be backing up somewhere on the $t
      socket.  You'll need to read that as well or it'll eventually
      grind to a halt when your buffers fill up.<br>
      <br>
      And you need to selectively gate some, but not all, of the stuff
      that you receive from the APRS-IS server back to local RF to be a
      fully-functioning IGate.<br>
      <br>
      Have you looked at aprsc?  And I've seen on the javAPRSSrvr that
      Pete's working on getting that running on the Pi.<br>
      <br>
      And just what doesn't aprx like about the D72?  You might need to
      put a few commands in there to get the D72 into KISS mode, but
      i'll be a much more functional IGate with a little bit of effort.<br>
      <br>
      Lynn (D) - KJ4ERJ - Author of APRSISCE for Windows Mobile and
      Win32<br>
      <br>
      On 11/16/2013 12:23 AM, Andrew Rich wrote:<br>
    </div>
    <blockquote cite="mid:31B72B65FEC64EA6B845E03FFFC56616@vk4tec"
      type="cite">
      <meta http-equiv="Content-Type" content="text/html;
        charset=ISO-8859-1">
      <meta name="Generator" content="Microsoft Word 11 (filtered
        medium)">
      <style>
<!--
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman";
        color:black;}
a:link, span.MsoHyperlink
        {color:blue;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {color:purple;
        text-decoration:underline;}
pre
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:10.0pt;
        font-family:"Courier New";
        color:black;}
span.EmailStyle17
        {mso-style-type:personal;
        font-family:Arial;
        color:windowtext;}
span.EmailStyle19
        {mso-style-type:personal-reply;
        font-family:Arial;
        color:navy;}
@page Section1
        {size:612.0pt 792.0pt;
        margin:72.0pt 90.0pt 72.0pt 90.0pt;}
div.Section1
        {page:Section1;}
-->
</style><!--[if gte mso 9]><xml>
 <o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
 <o:shapelayout v:ext="edit">
  <o:idmap v:ext="edit" data="1" />
 </o:shapelayout></xml><![endif]-->
      <div class="Section1">
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">That’s crazy – this
              works <o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy"><o:p> </o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">#!/usr/bin/perl<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">use Net::Telnet;<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">my $host =
              "rotate.aprs.net.au";<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">my $port = "14580";<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">my $t = new
              Net::Telnet(Timeout =>
              '600',Dump_log => 'dump.log',Input_log =>
              'input.log',Output_log =>
              'output.log',Prompt => "/$prmt/");<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">$t->errmode('die');<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">$t->Net::<a class="moz-txt-link-freetext" href="Telnet::open(Host">Telnet::open(Host</a>
              => $host,
              Port => $port);<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">print $t "user XXXXX
              pass XXXXX
              \n";<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">open
              (rf,"/dev/ttyUSB0");<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">while (<rf>)<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">{<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">if (m/^VK/)<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">{<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">print $t $_;<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">print;<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">}<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="2" color="navy" face="Arial"><span
              style="font-size:
              10.0pt;font-family:Arial;color:navy">}<o:p></o:p></span></font></p>
        <p class="MsoNormal"><font size="3" color="black" face="Times
            New Roman"><span style="font-size:12.0pt"><o:p> </o:p></span></font></p>
      </div>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <br>
      <pre wrap="">_______________________________________________
aprssig mailing list
<a class="moz-txt-link-abbreviated" href="mailto:aprssig@tapr.org">aprssig@tapr.org</a>
<a class="moz-txt-link-freetext" href="http://www.tapr.org/mailman/listinfo/aprssig">http://www.tapr.org/mailman/listinfo/aprssig</a>
</pre>
    </blockquote>
    <br>
  </body>
</html>