perl.libnet http://www.nntp.perl.org/group/perl.libnet/ ... Copyright 1998-2016 perl.org Fri, 29 Apr 2016 07:29:23 +0000 ask@perl.org Net::FTP Keep Alive by Scott Lambdin *<br/><br/>Hi - Is there a way to send keep alives or noop&#39;s on the control channel<br/>during a long data transfer so that the 42 black boxes in between me and the<br/>ftp server will stop killing me at 15 minutes?<br/><br/><br/><br/>--Scott<br/>*<br/><br/>-- <br/>There&#39;s a box? http://www.nntp.perl.org/group/perl.libnet/2009/03/msg104.html Thu, 12 Mar 2009 20:37:58 +0000 knock knock?? by Frans Grotepass Whose there??<br/><br/>To which list should libnet posts go, &#39;cause this list is living only due to the carrion eaters.<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2009/02/msg103.html Thu, 26 Feb 2009 00:20:44 +0000 Behaviour in FTP->get not quite as expected. by Frans Grotepass Hi all,<br/><br/>We use the FTP section of the library to gather remote files. We ran into a bug when the drive on <br/>the local machine filled up. I did some tests and found the following:<br/><br/>When calling FTP-&gt;get, the program neatly returned:<br/>&quot;Cannot write to Local file 04_20080726_165956_623.dat: No space left on device&quot;<br/>on stdout.<br/>The function: FTP-&gt;message, however returned:<br/>&quot; File successfully transferred&quot;<br/>for a partial transfer and<br/>&quot;Transfer aborted&quot;<br/>for the situation where the disk is completely full. Is it not an idea to include the &quot;No space left <br/>on device&quot; error in the message call?<br/><br/>Version of perl is 5.10.0 on Fedora 10<br/><br/><br/>On Solaris using 5.8.8 the following return values were seen.<br/>&quot;Transfer complete.&quot;<br/>for a partial transfer<br/>&quot;Transfer aborted. Data connection closed&quot;<br/>for no transfer.<br/><br/>How can I best handle a device full error when using the script in a set-up that has its own logging <br/>mechanism and does not use stdout for user interaction?<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2009/02/msg102.html Mon, 23 Feb 2009 05:55:07 +0000 Re: Firstus postus and strange behaviour. by Frans Grotepass Frans Grotepass wrote:<br/>&gt; Hi all,<br/>&gt; <br/>&gt; I am working with the FTP portion of the library and seeing some strange <br/>&gt; return values. The<br/>&gt; function &quot;get&quot; returns undef when things go wrong. The message() <br/>&gt; included with one of these cases<br/>&gt; is a &quot;Transfer complete&quot;. What could be the cause of this? I&#39;ll try and <br/>&gt; find the version of the lib<br/>&gt; used on the machine in question.<br/>&gt; <br/>&gt; <br/>&gt; <br/>&gt; <br/><br/>More information. Could this occur when the local directory is full?<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2009/01/msg101.html Fri, 30 Jan 2009 07:50:33 +0000 Firstus postus and strange behaviour. by Frans Grotepass Hi all,<br/><br/>I am working with the FTP portion of the library and seeing some strange return values. The<br/>function &quot;get&quot; returns undef when things go wrong. The message() included with one of these cases<br/>is a &quot;Transfer complete&quot;. What could be the cause of this? I&#39;ll try and find the version of the lib<br/>used on the machine in question.<br/><br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2009/01/msg100.html Fri, 30 Jan 2009 05:32:40 +0000 How to bind to specific interface with IO::Socket::Molticast? by Josef Wolf Hello,<br/><br/>On a multi-homed host, I want to create a separate socket for each<br/>multicast interface. So I have come up with the solution attached<br/>below. This solution works fine, except for one problem: if a packet<br/>is received on the given multicast-group, this packet is received on<br/>_all_ sockets and not only on the one that is bound to the receiving<br/>port.<br/><br/>Any hints how to tell IO::Socket::Multicast that it should deliver<br/>the packet only to the socket that listens on the receiving interface?<br/><br/>BTW: this is ubuntu-8.10 with Linux 2.6.27-7-generic<br/><br/>#! /usr/bin/perl<br/><br/>use strict;<br/>use warnings;<br/><br/>use IO::Handle;<br/>use IO::Select;<br/>use IO::Socket::INET;<br/>use IO::Socket::Multicast;<br/>use IO::Interface::Simple;<br/><br/>my $rdfds = IO::Select-&gt;new();<br/><br/>my @ssdp_server;<br/>foreach my $if (IO::Interface::Simple-&gt;interfaces) {<br/> my $adr=$if-&gt;address;<br/> next unless $adr =~ /^(192|172)/;<br/> next unless $if-&gt;is_multicast;<br/><br/> print &quot;$adr\n&quot;;<br/> my $socket = IO::Socket::Multicast-&gt;new (LocalAddr=&gt;&quot;239.255.255.250&quot;,<br/> LocalPort=&gt;1900,<br/> ReuseAddr=&gt;1) or die;<br/> $socket-&gt;mcast_add(&quot;239.255.255.250&quot;, $adr);<br/> $socket-&gt;mcast_if($adr);<br/> $socket-&gt;mcast_ttl(4);<br/> $socket-&gt;mcast_loopback(0);<br/> $rdfds-&gt;add($socket);<br/>}<br/><br/>while (1) {<br/> my @ready=$rdfds-&gt;can_read (0);<br/> foreach my $fh (@ready) {<br/> print $fh-&gt;mcast_if, &quot;\n&quot;;<br/> $fh-&gt;recv(my $data, 1024);<br/># print &quot;$data\n&quot;;<br/> }<br/>}<br/> http://www.nntp.perl.org/group/perl.libnet/2008/11/msg99.html Sat, 22 Nov 2008 04:24:15 +0000 Perl, Sockets and Select... by Steffen Heil Hi<br/><br/>I need to write a perl programm, which connects two tcp sockets to each<br/>other.<br/>One will be a pure IO::Socket::INET (a), the other will propably something<br/>link Net::HTTP::NB (b).<br/>Seems easy:<br/>Select on both.<br/> a.recv -&gt; b.write_chunk<br/> b.read_entity_body -&gt; a.send<br/>That&#39;s it.<br/><br/>However I seem to be unable to do this in a non-blocking way.<br/>Net::HTTP::NB has nonblocking read, but propably no non-blocking write.<br/>Net::HTTP does no seem to be thread-safe.<br/><br/>Every incoming byte from one connection shall be forwarded to the other and<br/>vice versa.<br/>I know that HTTP is not really a good choise for this, but the connections<br/>will be very low-bandwidth and only used very rarly. However I am bound to<br/>use HTTP.<br/><br/>One other limitation is, that lateron I need to support HTTPS.<br/><br/>Any hints would be greatly appreciated.<br/>Where should I start to read, what should I learn first or is there even<br/>something similar?<br/><br/>Regards,<br/> Steffen http://www.nntp.perl.org/group/perl.libnet/2008/03/msg98.html Wed, 26 Mar 2008 00:51:13 +0000 =?ISO-2022-JP?B?GyRCJVElQSVzJTMhJiVRJUElOSVtJE45NhsoQg==?==?ISO-2022-JP?B?GyRCTiwycTxSJEcjMiMwRy8hI0Q5JCROcjtLJEdDXyQoGyhC?==?ISO-2022-JP?B?GyRCJD8lRyE8JT8kcjBsNXM4eDMrGyhC?= by =?iso-2022-jp?B?GyRCJCskaiRzGyhC?= &#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;<br/>&#x30D1;&#x30C1;&#x30F3;&#x30B3;&#x30FB;&#x30D1;&#x30C1;&#x30B9;&#x30ED;&#x306E;&#x653B;&#x7565;&#x4F1A;&#x793E;&#x3067;&#xFF12;&#xFF10;&#x5E74;&#x3002;&#x9577;&#x3044;&#x6B74;&#x53F2;&#x3067;&#x84C4;&#x3048;&#x305F;&#x30C7;&#x30FC;&#x30BF;&#x3092;&#x4E00;&#x6319;&#x516C;&#x958B;<br/>&#x3002;&#xFF11;&#x5E74;&#x9593;&#x3060;&#x3051;&#x306E;&#x9650;&#x5B9A;&#x3067;&#x3059;&#x304C;&#x3001;&#x4E00;&#x5E74;&#x9593;&#x653B;&#x7565;&#x60C5;&#x5831;&#x3092;&#x7121;&#x6599;&#x3067;&#x63D0;&#x4F9B;&#x3002;&#x304A;&#x6025;&#x304E;&#x304F;&#x3060;&#x3055;&#x3044;&#x3002;<br/>http://karin1234.xsrv.jp/QR/public/l.php?3000&amp;395&amp;216 <br/>&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;<br/><br/>&#x30E1;&#x30FC;&#x30EB;&#x9577;&#x6587;<br/><br/>o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB; o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB; o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;<br/>&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x2605;&#x2606;&#x2605;&#x2606;&#x2605;&#x2606;&#x3000;19&#x5E74;&#x9023;&#x7D9A;&#x653B;&#x7565;&#x696D;&#x754C;NO.1&#x3000;&#x2605;&#x2606;&#x2605;&#x2606;&#x2605;&#x2606;<br/>o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB; o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB; o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;. o&#x25CB;<br/>&#x3000;&#x3000;<br/>&#x3000;&#x3000;&#x696D;&#x754C;&#x521D;&#x306E;&#x8A66;&#x307F;&#x3010;&#x30D1;&#x30C1;&#x30F3;&#x30B3;&#x30FB;&#x30B9;&#x30ED;&#x30C3;&#x30C8;&#x7121;&#x6599;&#x30B3;&#x30FC;&#x30B9;&#x3011;&#x3092;&#x9042;&#x306B;&#x958B;&#x8A2D;&#xFF01;&#xFF01;<br/>&#x3000;&#x3000;&#x65B0;&#x30B5;&#x30A4;&#x30C8;&#x958B;&#x8A2D;&#x8A18;&#x5FF5;&#x3068;&#x3057;&#x3066;&#x3001;&#x4ECA;&#x306A;&#x3089;&#x8CC7;&#x6599;&#x8ACB;&#x6C42;&#x3059;&#x308B;&#x3060;&#x3051;&#x3067;&ldquo;&#xFF23;&#xFF32;&#x5316;&#x9762;&#x30E9;&#x30A4;&#x30C0;&#x30FC;&quot;<br/>&#x3000;&#x3000;&ldquo;CR&#x3071;&#x3061;&#x3093;&#x3053;&#x5FC5;&#x6BBA;&#x4ED5;&#x4E8B;&#x4EBA;3&rdquo;&#x306E;&#x653B;&#x7565;&#x60C5;&#x5831;&#x304C;GET&#x51FA;&#x6765;&#x308B;&#xFF01;<br/>&#x3000;&#x3000;<br/>&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3055;&#x3089;&#x306B;&#xFF01;<br/><br/>&#x3000;&#x3000;&#x304A;&#x5BA2;&#x69D8;&#x306B;&#x6E80;&#x8DB3;&#x3057;&#x3066;&#x3082;&#x3089;&#x3046;&#x305F;&#x3081;&#x306B;&#x3001;&#x81E8;&#x6A5F;&#x5FDC;&#x5909;&#x306B;&#x5BFE;&#x5FDC;&#x3067;&#x304D;&#x308B;&#x3001;&#x3001;[&#x62C5;&#x5F53;&#x5236;]<br/>&#x3000;&#x3000;&#x88CF;&#x30E2;&#x30CE;&#x3001;&#x9060;&#x9694;&#x3092;&#x6271;&#x3063;&#x3066;&#x3044;&#x308B;&#x30DB;&#x30FC;&#x30EB;&#x3092;&#x653B;&#x7565;&#x3057;&#x3066;&#x3044;&#x304F;&#x3001;&#x3001;&#x3001;[&#x30C7;&#x30FC;&#x30BF;&#x653B;&#x7565;]<br/>&#x3000;&#x3000;&#x30C0;&#x30A4;&#x30EC;&#x30AF;&#x30C8;&#x306B;&#x53F0;&#x306E;&#x653B;&#x7565;&#x3092;&#x3057;&#x3066;&#x3044;&#x304F;&#x7686;&#x3055;&#x3093;&#x3054;&#x5B58;&#x77E5;&#x306E;&#x3001;&#x3001;&#x3001;&#x3001;[&#x653B;&#x7565;&#x60C5;&#x5831;]<br/>&#x3000;&#x3000;&#x3092;&#x7528;&#x610F;&#x3057;&#x3066;&#x3044;&#x307E;&#x3059;&#x3002;<br/><br/> &#x7121;&#x6599;&#x30B3;&#x30FC;&#x30B9;&#x65B0;&#x8A2D;&#x30AD;&#x30E3;&#x30F3;&#x30DA;&#x30FC;&#x30F3;&#x958B;&#x50AC;&#x4E2D;<br/>http://karin1234.xsrv.jp/QR/public/l.php?3000&amp;395&amp;216 <br/>&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;<br/>&#x25A0;KO&#x4F01;&#x753B;&#x306E;&#x9B45;&#x529B;&#x3068;&#x3001;&#x52DD;&#x3066;&#x308B;&#x5B89;&#x5FC3;&#x611F;<br/><br/>&#x2605;&#x653B;&#x7565;&#x6CD5;&#x7121;&#x6599;&#x4F53;&#x9A13;<br/>&#x73FE;&#x5F79;&#x4EBA;&#x6C17;&#x6A5F;&#x7A2E;&#x306E;&#x653B;&#x7565;&#x6CD5;&#x3092;&#x5B9F;&#x969B;&#x306B;&#x3054;&#x81EA;&#x5206;&#x306E;&#x624B;&#x3067;&#x884C;&#x3044;&#x3001;&#x8EAB;&#x306B;&#x3064;&#x3051;&#x3066;&#x3044;&#x305F;&#x3060;<br/>&#x304F;&#x3053;&#x3068;&#x304C;&#x3067;&#x304D;&#x307E;&#x3059;&#x3002;&#x203B;&#x6765;&#x793E;&#x3059;&#x308B;&#x306E;&#x304C;&#x96E3;&#x3057;&#x3044;&#x3068;&#x3044;&#x3046;&#x65B9;&#x306B;&#x306F;&#x653B;&#x7565;&#x30B7;&#x30FC;&#x30F3;&#x3092;<br/>&#x53CE;&#x9332;&#x3057;&#x305F;DVD&#x3092;&#x7121;&#x6599;&#x3067;&#x30D7;&#x30EC;&#x30BC;&#x30F3;&#x30C8;&#x3057;&#x3066;&#x304A;&#x308A;&#x307E;&#x3059;&#x3002;<br/><br/>&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x3000;&#x2606;&#x3010;&#x7121;&#x6599;&#x4F53;&#x9A13;&#x30FB;&#x7121;&#x6599;&#x63D0;&#x4F9B;&#x3011;&#x306E;&#x76EE;&#x7684;&#x2605;<br/>KO&#x4F01;&#x753B;&#x306E;&#x7121;&#x6599;&#x4F53;&#x9A13;&#x30FB;&#x7121;&#x6599;&#x63D0;&#x4F9B;&#x306F;&#x8A66;&#x3059;&#x306E;&#x304C;&#x76EE;&#x7684;&#x3067;&#x306F;&#x306A;&#x304F;&#x3001;&#x4F55;&#x304B;&#x4E00;&#x3064;&#x3067;&#x3082;<br/>&#x672C;&#x7269;&#x306E;&#x653B;&#x7565;&#x6CD5;&#x3092;&#x8EAB;&#x306B;&#x3064;&#x3051;&#x3066;&#x3044;&#x305F;&#x3060;&#x304F;&#x4E8B;&#x304C;&#x76EE;&#x7684;&#x3067;&#x3059;&#x3002;<br/>&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;<br/>&#x682A;&#x5F0F;&#x4F1A;&#x793E;KO&#x4F01;&#x753B;<br/>&#x25A0;&#x4F4F;&#x6240;&#xFF1A;&#x6771;&#x4EAC;&#x90FD;&#x65B0;&#x5BBF;&#x533A;&#x897F;&#x65B0;&#x5BBF;3-1-4&#x7B2C;&#x4E8C;&#x4F50;&#x5C71;&#x30D3;&#x30EB;7F&#x30FB;9F <br/>&#x25A0;&#x96FB;&#x8A71;&#xFF1A;03-3340-7000<br/>&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;&#x2501;<br/> http://www.nntp.perl.org/group/perl.libnet/2008/03/msg97.html Tue, 11 Mar 2008 12:27:25 +0000 question regarding bug 25019 "removes last character of each line" by Craig Constantine Hi,<br/><br/>I&#39;ve reviewed the bug report, the source code, the maillist archives...<br/><br/>Has there been any discussion re a solution to this bug. I believe I see<br/>what&#39;s wrong in the Net/FTP/A.pm at the top of write(), but I wanted to ask<br/>before I bite down and start coding/testing a patch.<br/><br/>thoughts?<br/>-c<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2007/03/msg96.html Tue, 06 Mar 2007 12:00:04 +0000 Re: Net::POP3 detecting if a server does *not* support SASL authentication by Graham Barr <br/>On May 28, 2006, at 9:13 AM, Achim Grolms wrote:<br/><br/>&gt; Hello,<br/>&gt;<br/>&gt; I am trying to use Net::POP3 to detect if a POP3 Server<br/>&gt; does *not* support SASL authentication.<br/>&gt;<br/>&gt; My idea is to use CAPA and check if SASL exists in servers answer:<br/>&gt;<br/>&gt; #------------------------------------------------------------------<br/>&gt; #! /usr/bin/perl -w<br/>&gt; use strict;<br/>&gt; use Net::POP3;<br/>&gt;<br/>&gt; my $targethost = &#39;pop.web.de&#39;;<br/>&gt;<br/>&gt; my $pop = Net::POP3-&gt;new( &#39;pop.web.de&#39; ) || die &quot;can not connect to<br/>&gt; $targethost &quot;;<br/>&gt; my $capa = $pop-&gt;capa() || die &#39;$pop-&gt;capa() failed&#39;;<br/>&gt;<br/>&gt; unless ( exists $capa-&gt;{&#39;SASL&#39;} ) {<br/>&gt; print &quot;\n I am sure the server does not support SASL\n&quot;;<br/>&gt; }<br/>&gt; #------------------------------------------------------------------<br/>&gt;<br/>&gt; My question is:<br/>&gt; Is this code doing what I want, or is it possible the Server<br/>&gt; supports a SASL mechanism (like GSSAPI), but does not answer the<br/>&gt; CAPA question with &#39;SASL&#39;?<br/>&gt; (Then my code is wrong!)<br/><br/>What do you see if you turn on debug trace with $pop-&gt;debug ?<br/><br/>Graham.<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2006/05/msg95.html Tue, 30 May 2006 16:25:45 +0000 Net::POP3 detecting if a server does *not* support SASL authentication by Achim Grolms Hello,<br/><br/>I am trying to use Net::POP3 to detect if a POP3 Server<br/>does *not* support SASL authentication.<br/><br/>My idea is to use CAPA and check if SASL exists in servers answer:<br/><br/>#------------------------------------------------------------------<br/>#! /usr/bin/perl -w<br/>use strict;<br/>use Net::POP3;<br/><br/>my $targethost = &#39;pop.web.de&#39;;<br/><br/>my $pop = Net::POP3-&gt;new( &#39;pop.web.de&#39; ) || die &quot;can not connect to <br/>$targethost &quot;;<br/>my $capa = $pop-&gt;capa() || die &#39;$pop-&gt;capa() failed&#39;;<br/><br/>unless ( exists $capa-&gt;{&#39;SASL&#39;} ) {<br/> print &quot;\n I am sure the server does not support SASL\n&quot;;<br/>}<br/>#------------------------------------------------------------------<br/><br/>My question is:<br/>Is this code doing what I want, or is it possible the Server<br/>supports a SASL mechanism (like GSSAPI), but does not answer the<br/>CAPA question with &#39;SASL&#39;?<br/>(Then my code is wrong!)<br/><br/>Thank you,<br/>Achim<br/> http://www.nntp.perl.org/group/perl.libnet/2006/05/msg94.html Sun, 28 May 2006 07:14:11 +0000 Question about Net::FTP regarding Timeout. by Hisatomo.Tanaka Hi,<br/><br/>I have a question about Net::FTP.<br/>It would be appreciated if anyone would my question.<br/><br/>My question is..<br/>I would like to know if ithere is a bug that when I use the PASSIVE-mode<br/>of Net::Ftp and a timeout occurs, there isn&#39;t any response and my<br/>program ends with no Log?<br/>(I&#39;m not sure if it occurs in PORT-mode)<br/><br/>The circumstance of my question is below.<br/><br/>==when it goes without any problem==<br/><br/>ClientSvr% test.pl<br/>Net::FTP&gt;&gt;&gt; Net::FTP(2.75)<br/>Net::FTP&gt;&gt;&gt; Exporter(5.58)<br/>Net::FTP&gt;&gt;&gt; Net::Cmd(2.26)<br/>Net::FTP&gt;&gt;&gt; IO::Socket::INET(1.28)<br/>Net::FTP&gt;&gt;&gt; IO::Socket(1.28)<br/>Net::FTP&gt;&gt;&gt; IO::Handle(1.24)<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 220 cosmos FTP server (SunOS 5.8) ready.<br/>*** new OK<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; user guest<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 331 Password required for tpmon.<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; PASS ....<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 230 User tpmon logged in.<br/>*** login OK<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; TYPE A<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 200 Type set to A.<br/>*** ascii OK<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; CWD /tmp/<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 250 CWD command successful.<br/>*** cwd OK<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; PASV<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 227 Entering Passive Mode (XXX.XXX.XXX.XXX,YYY,18)<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; NLST<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 150 ASCII data connection for /bin/ls (YYY.YYY.YYY.YYY,36628) (0 bytes).<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 226 ASCII Transfer complete.<br/>*** ls OK<br/>------------------------<br/>ps_data<br/>------------------------<br/>shi<br/>------------------------<br/>ups_data<br/>------------------------<br/>Net::FTP=GLOB(0x228d54)&gt;&gt;&gt; QUIT<br/>Net::FTP=GLOB(0x228d54)&lt;&lt;&lt; 221 Goodbye.<br/><br/><br/>==when it end with Timeout==<br/><br/>ClientSvr% test.pl<br/>Net::FTP&gt;&gt;&gt; Net::FTP(2.75)<br/>Net::FTP&gt;&gt;&gt; Exporter(5.58)<br/>Net::FTP&gt;&gt;&gt; Net::Cmd(2.26)<br/>Net::FTP&gt;&gt;&gt; IO::Socket::INET(1.28)<br/>Net::FTP&gt;&gt;&gt; IO::Socket(1.28)<br/>Net::FTP&gt;&gt;&gt; IO::Handle(1.24)<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 220 cosmos FTP server (SunOS 5.8) ready.<br/>*** new OK<br/>Net::FTP=GLOB(0x228d84)&gt;&gt;&gt; user guest<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 331 Password required for tpmon.<br/>Net::FTP=GLOB(0x228d84)&gt;&gt;&gt; PASS ....<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 230 User tpmon logged in.<br/>*** login OK<br/>Net::FTP=GLOB(0x228d84)&gt;&gt;&gt; TYPE A<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 200 Type set to A.<br/>*** ascii OK<br/>Net::FTP=GLOB(0x228d84)&gt;&gt;&gt; CWD /etc<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 250 CWD command successful.<br/>*** cwd OK<br/>Net::FTP=GLOB(0x228d84)&gt;&gt;&gt; PASV<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 227 Entering Passive Mode (XXX,XXX,XXX,XXX,YYY,21)<br/>Net::FTP=GLOB(0x228d84)&gt;&gt;&gt; NLST<br/>Net::FTP=GLOB(0x228d84)&lt;&lt;&lt; 150 ASCII data connection for /bin/ls (YYY.YYY.YYY.YYY,36643) (0 bytes).<br/>Timeout at /usr/local/lib/perl5/5.8.7/Net/FTP.pm line 1001<br/><br/><br/>// Debug Mode : on<br/>// &quot;***&quot; indicates output from test.pl<br/><br/>&quot;Timeout at /usr/local/lib/perl5/5.8.7/Net/FTP.pm line 1001&quot; means there<br/>is no response to test.pl.<br/><br/>If anyone needs more information about it let me know it.<br/>Thanks for your help in advance.<br/><br/>Sincerely,<br/><br/>Hisatomo<br/><br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2006/05/msg93.html Wed, 10 May 2006 21:58:14 +0000 Re: Net::NNTP by Graham Barr On Wed, November 9, 2005 1:49 pm, Yale Wilson wrote:<br/>&gt;<br/>&gt; &quot;Gene Mat&quot; &lt;geneSPAMAWAYmat@yahoo.com&gt; wrote in message<br/>&gt; news:Xns93B1AAF3974CgeneSPAMAWAYmatyahoo@64.70.54.95...<br/>&gt; &gt;I am trying to get a list of News Groups using Perl, however I get the<br/>&gt; &gt; following error, when I try either list(), newsgroups(), or the active<br/>&gt; ()<br/><br/><br/>&gt; &gt; $XOVER=$nntp-&gt;xover(19303);<br/>&gt; &gt; $LIST=$nnpt-&gt;list;<br/><br/>typo? Should that be $nntp not $nnpt<br/><br/>Adding use strict to you script would have caught this for you<br/><br/>Graham.<br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2005/11/msg92.html Thu, 10 Nov 2005 06:40:15 +0000 Re: Net::NNTP by Yale Wilson <br/> &quot;Gene Mat&quot; &lt;geneSPAMAWAYmat@yahoo.com&gt; wrote in message <br/>news:Xns93B1AAF3974CgeneSPAMAWAYmatyahoo@64.70.54.95...<br/> &gt;I am trying to get a list of News Groups using Perl, however I get the<br/> &gt; following error, when I try either list(), newsgroups(), or the active <br/>()<br/> &gt; functions.<br/> &gt;<br/> &gt; Can&#39;t call method &quot;active&quot; on an undefined value at ./getnntp.pl line <br/>11.<br/> &gt;<br/> &gt; #!/opt/local/bin/perl<br/> &gt; use Net::NNTP;<br/> &gt; $nntp = Net::NNTP-&gt;new(&quot;news.microsoft.com&quot;,Debug,1);<br/> &gt; $DATE=$nntp-&gt;date;<br/> &gt; $GROUP=$nntp-&gt;group;<br/> &gt; <br/>($narticles,$first,$last,$GROUP)=$nntp-&gt;group(&quot;microsoft.public.access&quot;);<br/> &gt; $XOVER=$nntp-&gt;xover(19303);<br/> &gt; $LIST=$nnpt-&gt;list;<br/> &gt; $nntp-&gt;quit;<br/> &gt;<br/> &gt; The other functions group,date and xover work fine.<br/> &gt;<br/> &gt; Thanks,<br/> &gt; GeneMat<br/><br/><br/><br/><br/>begin 666 p.gif<br/>M1TE&amp;.#EAB0`1`( !```3S/___R&#39;Y! $```$`+ ````&quot;)`!$```+1C(^IR^T/<br/>MHYRTVHNSWKS[#S[ 6(TFH)WD828H\RIO&#39;$XQ+;L?/K,(_H,9@#4&#39;KW&#39;T&#39;)-#<br/>M7U,8(!:ABU9T]0S.L%?@TNB,LK&quot;]+LUJ_I&#39;%5^2XS.:=AO&quot;Z2Y6MAKU/NXX=<br/>MY[0&quot;]R&lt;X!YB7A6?&amp;% 2&amp;`JDVV+=G=4-GZ4A%69@(R+&lt;9EA@9J&lt;AY^6F*. I&amp;<br/>MI]JH&amp;LBJYYFZ=RJ8RRG+6T5RPW66\R8Y[&quot;N%^E:V%6R)UB7*-34]+=79H9*M<br/>9O&lt;W=[?T-&#39;BX^_DQM?HZ&gt;KK[.WN[N40``.P``<br/>`<br/>end<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2005/11/msg91.html Thu, 10 Nov 2005 03:13:06 +0000 Net::Ping ICMP in threads problem by Lorenz Pfiffner Hi there<br/><br/>I&#39;m currently fighting against a strange problem. My perl script should<br/>do parallel pinging to a scope of addresses in a subnet. The code works<br/>fine if I use Net::Ping with UDP or TCP. But that&#39;s not a satisfying<br/>solution. I need ICMP because of the reachability of devices. (And less<br/>overhead)<br/><br/>I think that there&#39;s a problem in connection with threads. When I do it<br/>in a sequence without threads, the result is correct as it is if I use<br/>UDP with threads.<br/><br/>The problem is, that the result is completely wrong. The pings are set<br/>up correct, I captured icmp traffic with tcpdump. Seems that there are<br/>values, that become overwritten again and again everytime a new thread<br/>is started.<br/><br/>Now I found out that when I do a sleep before I start the thread, the<br/>answers are also ok. So if you look in the code.. if I set $sleeptime to<br/>higher than $pingtimeout it works. But then it is like a sequence<br/>because it waits until the thread finished and after that it starts a<br/>new ping subroutine.<br/><br/>Seems that using threads causes Net::Ping to mess up something with it&#39;s<br/>variables?<br/><br/>Any suggestions, ideas?<br/><br/>Greetings<br/>Lorenz<br/><br/><br/>-----snip-----<br/> #!/usr/bin/perl -w<br/> <br/>use threads;<br/>use Net::Ping;<br/><br/>my $sleeptime = 0;<br/> <br/>sub createsubnet {<br/> push(@ipaddr, &quot;10.0.0.1&quot;, &quot;10.0.0.2&quot;, &quot;10.0.0.3&quot;, &quot;10.0.0.4&quot;,<br/>&quot;10.0.0.5&quot;, &quot;10.0.0.7&quot;, &quot;10.0.0.8&quot;, &quot;10.0.0.9&quot;, &quot;10.0.0.11&quot;,<br/>&quot;10.0.0.12&quot;, &quot;10.0.0.13&quot;, &quot;10.0.0.14&quot;, &quot;10.0.0.15&quot;, &quot;10.0.0.16&quot;,<br/>&quot;10.0.0.17&quot;, &quot;10.0.0.18&quot;, &quot;10.0.0.19&quot;, &quot;10.0.0.20&quot;, &quot;10.0.0.21&quot;,<br/>&quot;10.0.0.22&quot; );<br/>}<br/> <br/>sub startping {<br/> my $host = $_;<br/> my $pingprotocol = &quot;icmp&quot;;<br/> my $pingtimeout = 1;<br/> my $pinglength = 1;<br/> <br/> my $p = Net::Ping-&gt;new($pingprotocol,$pingtimeout,$pinglength);<br/> if ( $p-&gt;ping($host) ) {<br/> print &quot;$host OK\n&quot;;<br/> } else {<br/> print &quot;$host dead\n&quot;;<br/> }<br/> $p-&gt;close();<br/>}<br/><br/>sub startthreads {<br/> foreach (@ipaddr) {<br/> sleep($sleeptime);<br/> push(@pinged_addr, threads-&gt;create(&quot;startping&quot;, $_));<br/> }<br/> <br/> foreach (@pinged_addr) { $_-&gt;join(); }<br/>}<br/><br/>createsubnet;<br/>startthreads;<br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/06/msg90.html Mon, 14 Jun 2004 08:31:36 +0000 Re: Net::FTP::Recursive; by isaac_koenig No, I commented everything out, except<br/>$ftp = Net::FTP::Recursive-&gt;new($host, Timeout=&gt;60) or $newerr=1;<br/> I still received the same error message.<br/><br/><br/>James D. White wrote:<br/><br/>&gt; Just a guess, because I have used only Net::FTP, not <br/>&gt; Net::FTP::Recursive, but is line 25<br/>&gt; &quot;$ftp-&gt;quit if $newerr;&quot;? How can you quit, if you did not connect? If <br/>&gt; $ftp is false it cannot<br/>&gt; be a valid object reference.<br/><br/>&gt; PerlDiscuss - Perl Newsgroups and mailing lists wrote:<br/><br/>&gt; &gt;I am using the Recursive Lib to copy directories from one location to<br/>&gt; &gt;another. However, I would like to verify that I was able to make a<br/>&gt; &gt;successful connection to the server by the following code. If the<br/>&gt; &gt;connection fails, it goes to a subroutine that prints out the errors. This<br/>&gt; &gt;error handling successful for all the other routines, like logging in,<br/>&gt; &gt;cwd, or rput. However, when I test the connection piece, i get the<br/>&gt; &gt;following error message.<br/>&gt; &gt;<br/>&gt; &gt;&quot;Can&#39;t bless non-reference value at<br/>&gt; &gt;/usr/local/lib/perl5/site_perl/5.6.1/Net/FTP/Recursive.pm line 25.&quot;<br/>&gt; &gt;<br/>&gt; &gt;<br/>&gt; &gt;The following is the code:<br/>&gt; &gt;$ftp = Net::FTP::Recursive-&gt;new($host, Timeout=&gt;60) or $newerr=1;<br/>&gt; &gt; push @ERRORS, &quot;Can&#39;t login to server: $host: $!n&quot; if $newerr;<br/>&gt; &gt; $ftp-&gt;quit if $newerr;<br/>&gt; &gt; myerr() if $newerr;<br/>&gt; &gt; print &quot;Connected to $hostn&quot;;<br/>&gt; &gt;<br/>&gt; &gt;sub myerr {<br/>&gt; &gt; print &quot;Error!!: n&quot;;<br/>&gt; &gt; print @ERRORS;<br/>&gt; &gt; exit 1;<br/>&gt; &gt;}<br/>&gt; &gt;<br/>&gt; &gt; <br/>&gt; &gt;<br/><br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg89.html Wed, 19 May 2004 07:18:08 +0000 Re: Net::FTP::Recursive; by James D. White Just a guess, because I have used only Net::FTP, not <br/>Net::FTP::Recursive, but is line 25<br/>&quot;$ftp-&gt;quit if $newerr;&quot;? How can you quit, if you did not connect? If <br/>$ftp is false it cannot<br/>be a valid object reference.<br/><br/>PerlDiscuss - Perl Newsgroups and mailing lists wrote:<br/><br/>&gt;I am using the Recursive Lib to copy directories from one location to<br/>&gt;another. However, I would like to verify that I was able to make a<br/>&gt;successful connection to the server by the following code. If the<br/>&gt;connection fails, it goes to a subroutine that prints out the errors. This<br/>&gt;error handling successful for all the other routines, like logging in,<br/>&gt;cwd, or rput. However, when I test the connection piece, i get the<br/>&gt;following error message.<br/>&gt;<br/>&gt;&quot;Can&#39;t bless non-reference value at<br/>&gt;/usr/local/lib/perl5/site_perl/5.6.1/Net/FTP/Recursive.pm line 25.&quot;<br/>&gt;<br/>&gt;<br/>&gt;The following is the code:<br/>&gt;$ftp = Net::FTP::Recursive-&gt;new($host, Timeout=&gt;60) or $newerr=1;<br/>&gt; push @ERRORS, &quot;Can&#39;t login to server: $host: $!\n&quot; if $newerr;<br/>&gt; $ftp-&gt;quit if $newerr;<br/>&gt; myerr() if $newerr;<br/>&gt; print &quot;Connected to $host\n&quot;;<br/>&gt;<br/>&gt;sub myerr {<br/>&gt; print &quot;Error!!: \n&quot;;<br/>&gt; print @ERRORS;<br/>&gt; exit 1;<br/>&gt;}<br/>&gt;<br/>&gt; <br/>&gt;<br/><br/>-- <br/>James D. White (jdw@ou.edu)<br/>Assistant Director, Advanced Center for Genome Technology<br/>University of Oklahoma<br/>101 David L. Boren Blvd., SRTC 2100<br/>Norman, OK 73019<br/>Phone: (405) 325-4912, FAX: (405) 325-7762<br/><br/><br/><br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg88.html Tue, 18 May 2004 11:22:27 +0000 Net::FTP::Recursive; by isaac_koenig I am using the Recursive Lib to copy directories from one location to<br/>another. However, I would like to verify that I was able to make a<br/>successful connection to the server by the following code. If the<br/>connection fails, it goes to a subroutine that prints out the errors. This<br/>error handling successful for all the other routines, like logging in,<br/>cwd, or rput. However, when I test the connection piece, i get the<br/>following error message.<br/><br/>&quot;Can&#39;t bless non-reference value at<br/>/usr/local/lib/perl5/site_perl/5.6.1/Net/FTP/Recursive.pm line 25.&quot;<br/><br/><br/>The following is the code:<br/>$ftp = Net::FTP::Recursive-&gt;new($host, Timeout=&gt;60) or $newerr=1;<br/> push @ERRORS, &quot;Can&#39;t login to server: $host: $!\n&quot; if $newerr;<br/> $ftp-&gt;quit if $newerr;<br/> myerr() if $newerr;<br/> print &quot;Connected to $host\n&quot;;<br/><br/>sub myerr {<br/> print &quot;Error!!: \n&quot;;<br/> print @ERRORS;<br/> exit 1;<br/>}<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg87.html Tue, 18 May 2004 08:11:51 +0000 Re: FTP->Binary by Anthony R. J. Ball <br/> Hehe.. that is because binary calls the type command internally,<br/> which returns the _old_ value of the type, not the value you set it<br/> to. :)<br/><br/>On Tue, May 18, 2004 at 01:41:45PM -0000, PerlDiscuss - Perl Newsgroups and mailing lists wrote:<br/>&gt; Ok, I resolved the issue.<br/>&gt; <br/>&gt; For some reason PERL does not like the command:<br/>&gt; $bin=$ftp-&gt;binary;<br/>&gt; <br/>&gt; The reason why I needed a variable is to &quot;verify&quot; that it is actually in<br/>&gt; BIN mode. What I to resolve this issue was to code as follows:<br/>&gt; <br/>&gt; $ftp-&gt;binary;<br/>&gt; $bin=$ftp-&gt;type;<br/>&gt; <br/>&gt; By doing it this way I was able to set it to Binary and then retrieve the<br/>&gt; type.<br/>&gt; <br/>&gt; Thanks for all your assistance.<br/>&gt; <br/>&gt; Isaac<br/>&gt; <br/>&gt; Perldiscuss - Perl Newsgroups And Mailing Lists wrote:<br/>&gt; <br/>&gt; &gt; I am trying to get my program to switch to Binary mode. I know the command<br/>&gt; &gt; is ftp-&gt;binary();, however, it does not work. By chance, i got the program<br/>&gt; &gt; to work only when i have the following lines of code inserted:<br/>&gt; &gt; $bin=$ftp-&gt;binary or die &quot;Can not change the Type to Binaryn&quot;;<br/>&gt; &gt; $bin=$ftp-&gt;binary;<br/>&gt; <br/>&gt; &gt; If I take out any of those lines it transfers in Ascii mode. Why?<br/>&gt; <br/>&gt; &gt; Thanks<br/>&gt; &gt; Isaac<br/>&gt; <br/>&gt; <br/><br/>-- <br/> www.suave.net - Anthony Ball - ant@suave.net<br/> OSB - http://rivendell.suave.net/Beer<br/>-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=<br/>He who does not prevent a crime when he can, encourages it.[Seneca]<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg86.html Tue, 18 May 2004 07:29:02 +0000 Re: FTP->Binary by isaac_koenig Ok, I resolved the issue.<br/><br/>For some reason PERL does not like the command:<br/>$bin=$ftp-&gt;binary;<br/><br/>The reason why I needed a variable is to &quot;verify&quot; that it is actually in<br/>BIN mode. What I to resolve this issue was to code as follows:<br/><br/>$ftp-&gt;binary;<br/>$bin=$ftp-&gt;type;<br/><br/>By doing it this way I was able to set it to Binary and then retrieve the<br/>type.<br/><br/>Thanks for all your assistance.<br/><br/>Isaac<br/><br/>Perldiscuss - Perl Newsgroups And Mailing Lists wrote:<br/><br/>&gt; I am trying to get my program to switch to Binary mode. I know the command<br/>&gt; is ftp-&gt;binary();, however, it does not work. By chance, i got the program<br/>&gt; to work only when i have the following lines of code inserted:<br/>&gt; $bin=$ftp-&gt;binary or die &quot;Can not change the Type to Binaryn&quot;;<br/>&gt; $bin=$ftp-&gt;binary;<br/><br/>&gt; If I take out any of those lines it transfers in Ascii mode. Why?<br/><br/>&gt; Thanks<br/>&gt; Isaac<br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg85.html Tue, 18 May 2004 07:04:30 +0000 Re: FTP->Binary by Terrence Brannon Graham Barr wrote:<br/><br/>&gt;<br/>&gt; On 18 May 2004, at 11:12, Terrence Brannon wrote:<br/>&gt;<br/>&gt;&gt; PerlDiscuss - Perl Newsgroups and mailing lists wrote:<br/>&gt;&gt;<br/>&gt;&gt;&gt; I am trying to get my program to switch to Binary mode. I know the <br/>&gt;&gt;&gt; command<br/>&gt;&gt;&gt; is ftp-&gt;binary();, however, it does not work.<br/>&gt;&gt;&gt;<br/>&gt;&gt; where in the Net::FTP docs does it say that? I don&#39;t think you will <br/>&gt;&gt; find it.<br/>&gt;<br/>&gt;<br/>&gt; I think you will.<br/><br/>oh, what I was referring to was his lack of a dollar sign in front of <br/>&quot;ftp&quot; ---<br/><br/><br/>&gt;&gt;&gt;<br/>&gt;&gt; You can set the default server transfer type when you create $ftp <br/>&gt;&gt; also... perldoc Net::FTP for more details:<br/>&gt;&gt;<br/>&gt;&gt; $net = Net::FTP-&gt;new($host, { Type =&gt; &#39;I&#39; } ); #for example, untested<br/>&gt;<br/>&gt;<br/>&gt; Wow, thats new to me :-)<br/>&gt;<br/>oops, Net::FTP::Common allows that. I am very rusty at Perl programming. <br/>my bad.<br/><br/><br/>-- <br/>mathematics: the science of quantity, shape, and arrangement<br/>computersci: the science of information description and transformation<br/>liberalarts: essential study for adequate education and civic participation. <br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg84.html Tue, 18 May 2004 03:51:26 +0000 Re: FTP->Binary by Graham Barr <br/>On 18 May 2004, at 11:12, Terrence Brannon wrote:<br/><br/>&gt; PerlDiscuss - Perl Newsgroups and mailing lists wrote:<br/>&gt;<br/>&gt;&gt; I am trying to get my program to switch to Binary mode. I know the <br/>&gt;&gt; command<br/>&gt;&gt; is ftp-&gt;binary();, however, it does not work.<br/>&gt;&gt;<br/>&gt; where in the Net::FTP docs does it say that? I don&#39;t think you will <br/>&gt; find it.<br/><br/>I think you will.<br/><br/>&gt;&gt; By chance, i got the program<br/>&gt;&gt; to work only when i have the following lines of code inserted:<br/>&gt;&gt; $bin=$ftp-&gt;binary or die &quot;Can not change the Type to Binary\n&quot;;<br/>&gt;&gt; $bin=$ftp-&gt;binary;<br/>&gt;&gt;<br/>&gt;&gt; If I take out any of those lines it transfers in Ascii mode. Why?<br/>&gt;&gt;<br/>&gt; I think the server can default to ascii or binary. But then it can be <br/>&gt; changed.<br/><br/>Nope, it does as its told.<br/><br/>&gt;&gt; Thanks<br/>&gt;&gt; Isaac<br/>&gt;&gt;<br/>&gt;&gt;<br/>&gt;&gt;<br/>&gt; You can set the default server transfer type when you create $ftp <br/>&gt; also... perldoc Net::FTP for more details:<br/>&gt;<br/>&gt; $net = Net::FTP-&gt;new($host, { Type =&gt; &#39;I&#39; } ); #for example, untested<br/><br/>Wow, thats new to me :-)<br/><br/>Graham.<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg83.html Tue, 18 May 2004 03:19:01 +0000 Re: FTP->Binary by Terrence Brannon PerlDiscuss - Perl Newsgroups and mailing lists wrote:<br/><br/>&gt;I am trying to get my program to switch to Binary mode. I know the command<br/>&gt;is ftp-&gt;binary();, however, it does not work.<br/>&gt;<br/>where in the Net::FTP docs does it say that? I don&#39;t think you will find it.<br/><br/>&gt; By chance, i got the program<br/>&gt;to work only when i have the following lines of code inserted:<br/>&gt;$bin=$ftp-&gt;binary or die &quot;Can not change the Type to Binary\n&quot;;<br/>&gt;$bin=$ftp-&gt;binary;<br/>&gt;<br/>&gt;If I take out any of those lines it transfers in Ascii mode. Why?<br/>&gt; <br/>&gt;<br/>I think the server can default to ascii or binary. But then it can be <br/>changed.<br/><br/>&gt;Thanks<br/>&gt;Isaac<br/>&gt;<br/>&gt;<br/>&gt; <br/>&gt;<br/>You can set the default server transfer type when you create $ftp <br/>also... perldoc Net::FTP for more details:<br/><br/>$net = Net::FTP-&gt;new($host, { Type =&gt; &#39;I&#39; } ); #for example, untested<br/><br/><br/><br/><br/>-- <br/>mathematics: the science of quantity, shape, and arrangement<br/>computersci: the science of information description and transformation<br/>liberalarts: essential study for adequate education and civic participation. <br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg82.html Tue, 18 May 2004 03:12:27 +0000 FTP->Binary by isaac_koenig I am trying to get my program to switch to Binary mode. I know the command<br/>is ftp-&gt;binary();, however, it does not work. By chance, i got the program<br/>to work only when i have the following lines of code inserted:<br/>$bin=$ftp-&gt;binary or die &quot;Can not change the Type to Binary\n&quot;;<br/>$bin=$ftp-&gt;binary;<br/><br/>If I take out any of those lines it transfers in Ascii mode. Why?<br/><br/>Thanks<br/>Isaac<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2004/05/msg81.html Tue, 18 May 2004 03:02:43 +0000 STOU with non-compliant remote hosts by Wiggins d Anconia The issue is that when calling the &#39;put_unique&#39; method if the remote<br/>server does not implement the protocol properly (aka it does not return<br/>a remote file name) then &#39;put_unique&#39; returns &#39;undef&#39; (false) eventhough<br/>the file may have been transferred successfully.<br/><br/>Naturally my request would be that it either set an artifical true but<br/>with a warning, or return undef after not being able to find a remote<br/>file name but before actually transferring the file.<br/><br/>Or am I just off my rocker and not reading the source properly? The<br/>culprit is in Net/FTP.pm line 720. In the case of STOR and APPE the<br/>remote filename is set, in the case of STOU it should be set in the<br/>session transcript from the remote host, and in the case that it can&#39;t<br/>be scraped from there it is set to an undefined value, then once the<br/>preceedings are closed $remote is returned which is still undef,<br/>eventhough the file has been transferred.<br/><br/>I also realize that the FTP implementation on the remote side is not RFC<br/>compliant (damn legacy mainframes), but I would think Net::FTP should<br/>work around that, even if just to complain that it is not compliant and<br/>fail miserably rather than returning a false negative.<br/><br/>A similar issue was raised here:<br/>http://rt.cpan.org/NoAuth/Bug.html?id=1442<br/><br/>But doesn&#39;t hit to when the remote host does not provide anything like<br/>those messages, or anything at all.<br/><br/>Let me know if more information is needed,<br/><br/>http://danconia.org<br/><br/>--<br/>Boycott the Sugar Bowl! You couldn&#39;t pay me to watch that game.<br/> http://www.nntp.perl.org/group/perl.libnet/2003/12/msg80.html Wed, 17 Dec 2003 09:16:44 +0000 Re: Net::FTP versus TLS by atlems_ Dariush Pietrzak wrote:<br/><br/>&gt; &gt; Sadly its not that simple. I am working on a new libnet that will allow<br/>&gt; &gt; this but it is nowhere near ready yet. Until then your best option<br/>&gt; Hi hi, i just made my first tls/ftp trasmission using perl.<br/>&gt; I used Net::SSLeay::Handle to switch encryption on while socket is opened<br/>&gt; ( it seems it&#39;s needed at two places - first, you need to switch after AUTH<br/>&gt; TLS, and second - when you do passive transfers, you need to connect to<br/>&gt; socket first ( after PASV ), and then switch encryption on after you run<br/>&gt; RETR or LIST ( this is assuming you&#39;re using PROT P ) ).<br/>&gt; How can I help in introducing this into Net::FTP?<br/><br/>Hello<br/>I am currently working on a perl script which also needs to be able to<br/>connect to ftp servers using tls. Using lftp is though not an option. It<br/>would have been very nice if you could have sent me an example (or simply<br/>posted it here) of how to establish a connection to a tls encrypted server<br/>and login with username/pass.<br/><br/>I would really have appreciated it!<br/><br/>Thanks!<br/><br/>With sincere regards,<br/>Atle<br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2003/08/msg79.html Thu, 07 Aug 2003 07:49:29 +0000 Net::Telnet on winNT problems by Theisen, Gary Hi all,<br/><br/>I&#39;ve been searching the web/lists/doc&#39;s but have yet to find an answer, I&#39;ve<br/>tried to do my homework first before posting here.<br/><br/>My scenario:<br/>Using winNT 4.0 box &amp; IIS webserver using mainly PHP for scripting. PHP<br/>doesn&#39;t support (yet, so my script will call this to be PERL script) what I<br/>need to do which is.<br/><br/>1. Connect to a mainframe (os/390).<br/>2. Browse a VSAM file &amp; extract specific data into an array.<br/><br/>Very simply....at least seemingly so. The access to the VSAM file is the<br/>key here. I can make an FTP &amp; telnet connections no problem. FTP from PHP<br/>web script &amp; telnet from 3rd party JAVA client.<br/><br/>My web script needs to call this perl script, which will work &quot;behind the<br/>scenes&quot; to populate the array on the local machine.<br/><br/>I need to somehow open a connection to the mainframe w/o doing an FTP<br/>download. The file I&#39;m browsing is enormous, so an FTP isn&#39;t feasible.<br/>I&#39;ve read that using Net:Telnet (which I have successfully installed/made on<br/>my NT 4 box), is very tricky on a windows box because windows doesn&#39;t use a<br/>&quot;real&quot; telnet client.<br/><br/>This is my code so far:<br/><br/>use Net::Telnet;<br/><br/>$uID = &quot;something&quot;; $uPASS = &quot;thepass&quot;;<br/>$telnet = new Net::Telnet ( Timeout=&gt;5,<br/> Errmode=&gt;&#39;die&#39;,<br/> Prompt =&gt; &#39;/\$ $/i&#39;);<br/>$telnet-&gt;open(&#39;mainframe.com&#39;);<br/>$telnet-&gt;login($uID, $uPASS);<br/>print $telnet-&gt;cmd(&#39;who&#39;);<br/><br/>times out...says waiting for login prompt.<br/><br/>What is the workaround to this? A free windows telnet that installs<br/>smoothly &amp; can be used with Net:Telnet? <br/>Has anyone actually gotten something like this to really work??<br/><br/>Sorry for the long winded post....any suggestions/links to actual working<br/>tutorial??<br/><br/>Thanks!!<br/><br/>Gary<br/><br/><br/> http://www.nntp.perl.org/group/perl.libnet/2003/08/msg78.html Tue, 05 Aug 2003 16:20:25 +0000 Re: Net::NNTP by Jan Pieter Cornet On Mon, Jul 07, 2003 at 08:48:19PM -0000, Gene Mat wrote:<br/>&gt; I am trying to get a list of News Groups using Perl, however I get the <br/>&gt; following error, when I try either list(), newsgroups(), or the active () <br/>&gt; functions.<br/>&gt; <br/>&gt; Can&#39;t call method &quot;active&quot; on an undefined value at ./getnntp.pl line 11.<br/>&gt; <br/>&gt; #!/opt/local/bin/perl<br/>&gt; use Net::NNTP;<br/><br/>Bzzt. Two errors already: You forgot the &quot;-w&quot; switch to perl,<br/>and you probably forgot to &quot;use strict&quot;.<br/><br/>Try the -w switch first, and the real error will be very obvious.<br/>Then try &quot;use strict&quot; and you&#39;ll need to sprinkle a lot of &quot;my&quot;s<br/>around.<br/><br/>&gt; $nntp = Net::NNTP-&gt;new(&quot;news.microsoft.com&quot;,Debug,1);<br/>&gt; $DATE=$nntp-&gt;date;<br/>&gt; $GROUP=$nntp-&gt;group;<br/>&gt; ($narticles,$first,$last,$GROUP)=$nntp-&gt;group(&quot;microsoft.public.access&quot;);<br/>&gt; $XOVER=$nntp-&gt;xover(19303);<br/>&gt; $LIST=$nnpt-&gt;list;<br/>&gt; $nntp-&gt;quit; <br/>&gt; <br/>&gt; The other functions group,date and xover work fine.<br/><br/>Sure, because they&#39;re not called on an undefined value.<br/><br/>HTH,<br/><br/>-- <br/>#!perl -pl # This kenny-filter is virus-free as long as you don&#39;t copy it<br/>$p=3-2*/[^\W\dmpf_]/i;s.[a-z]{$p}.vec($f=join(&#39;&#39;,$p-1?chr(sub{$_[0]*9+$_[1]*3+<br/>$_[2]}-&gt;(map{/p|f/i+/f/i}split//,$&amp;)+97):(&#39;m&#39;,p,f)[map{((ord$&amp;)%32-1)/$_%3}(9,<br/>3,1)]),5,1)=&#39;`&#39;lt$&amp;;$f.eig; # Jan-Pieter Cornet<br/> http://www.nntp.perl.org/group/perl.libnet/2003/07/msg77.html Mon, 07 Jul 2003 23:43:25 +0000 Net::NNTP by geneSPAMAWAYmat I am trying to get a list of News Groups using Perl, however I get the <br/>following error, when I try either list(), newsgroups(), or the active () <br/>functions.<br/><br/>Can&#39;t call method &quot;active&quot; on an undefined value at ./getnntp.pl line 11.<br/><br/>#!/opt/local/bin/perl<br/>use Net::NNTP;<br/>$nntp = Net::NNTP-&gt;new(&quot;news.microsoft.com&quot;,Debug,1);<br/>$DATE=$nntp-&gt;date;<br/>$GROUP=$nntp-&gt;group;<br/>($narticles,$first,$last,$GROUP)=$nntp-&gt;group(&quot;microsoft.public.access&quot;);<br/>$XOVER=$nntp-&gt;xover(19303);<br/>$LIST=$nnpt-&gt;list;<br/>$nntp-&gt;quit; <br/><br/>The other functions group,date and xover work fine.<br/><br/>Thanks,<br/>GeneMat<br/> http://www.nntp.perl.org/group/perl.libnet/2003/07/msg76.html Mon, 07 Jul 2003 20:37:44 +0000 Net::POP3 by Lev Altshuler Hello, <br/> <br/>I am trying to count email messages in the mailbox and read their headers. <br/>In case that there are some messages on the POP3 server and <br/>they haven&#39;t yet got to the Inbox, I get a number of messages. <br/>As soon as they have been in the Inbox, I get &#39;0E0&#39; as a number of messages. <br/>What feature of Net::POP3 am I unaware of, or <br/>where did I screw up in the code? <br/> <br/>use Net::POP3; <br/> <br/>my $server = &quot;pop.bloor.phub.net.cable.rogers.com&quot;; <br/>my $pop3 = Net::POP3-&gt;new($server, Timeout =&gt; 10, Debug =&gt;1); <br/>die &quot;Couldn&#39;t log on to server&quot; unless $pop3; <br/> <br/>my $user = &quot;levalt\@rogers.com&quot;; <br/>my $password = &quot;password&quot;; <br/>my $num_Messages = $pop3-&gt;login($user, $password); <br/>print &quot;$num_Messages\n&quot;; <br/> <br/>Thanks, Lev <br/> http://www.nntp.perl.org/group/perl.libnet/2003/07/msg75.html Sun, 06 Jul 2003 19:13:12 +0000 Re: Net::FTP versus TLS by Graham Barr On Wed, May 28, 2003 at 02:59:59PM +0200, Dariush Pietrzak wrote:<br/>&gt; &gt; Sadly its not that simple. I am working on a new libnet that will allow<br/>&gt; &gt; this but it is nowhere near ready yet. Until then your best option<br/>&gt; Hi hi, i just made my first tls/ftp trasmission using perl.<br/>&gt; I used Net::SSLeay::Handle to switch encryption on while socket is opened<br/>&gt; ( it seems it&#39;s needed at two places - first, you need to switch after AUTH<br/>&gt; TLS, and second - when you do passive transfers, you need to connect to<br/>&gt; socket first ( after PASV ), and then switch encryption on after you run<br/>&gt; RETR or LIST ( this is assuming you&#39;re using PROT P ) ).<br/>&gt; How can I help in introducing this into Net::FTP?<br/><br/>Send a patch.<br/><br/>Graham.<br/> http://www.nntp.perl.org/group/perl.libnet/2003/05/msg74.html Wed, 28 May 2003 06:52:39 +0000 Re: Net::FTP versus TLS by Dariush Pietrzak &gt; Sadly its not that simple. I am working on a new libnet that will allow<br/>&gt; this but it is nowhere near ready yet. Until then your best option<br/> Hi hi, i just made my first tls/ftp trasmission using perl.<br/>I used Net::SSLeay::Handle to switch encryption on while socket is opened<br/>( it seems it&#39;s needed at two places - first, you need to switch after AUTH<br/>TLS, and second - when you do passive transfers, you need to connect to<br/>socket first ( after PASV ), and then switch encryption on after you run<br/>RETR or LIST ( this is assuming you&#39;re using PROT P ) ).<br/> How can I help in introducing this into Net::FTP?<br/> <br/>-- <br/>Dariush Pietrzak,<br/>She swore and she cursed, that she never would deceive me<br/>Key fingerprint = 40D0 9FFB 9939 7320 8294 05E0 BCC7 02C4 75CC 50D9<br/> http://www.nntp.perl.org/group/perl.libnet/2003/05/msg73.html Wed, 28 May 2003 05:59:59 +0000 Re: Net::FTP versus TLS by Dariush Pietrzak &gt; Sadly its not that simple. I am working on a new libnet that will allow<br/>&gt; this but it is nowhere near ready yet. Until then your best option<br/>&gt; is using lftp<br/> Since lftp is not very suited to the application ( it&#39;s way too smart ),<br/>how far from ready is new libnet? Can I help? Can I take a look at what&#39;s<br/>done?<br/><br/>regards,<br/>-- <br/>Dariush Pietrzak,<br/>She swore and she cursed, that she never would deceive me<br/>Key fingerprint = 40D0 9FFB 9939 7320 8294 05E0 BCC7 02C4 75CC 50D9<br/> http://www.nntp.perl.org/group/perl.libnet/2003/05/msg72.html Wed, 28 May 2003 00:03:40 +0000 Re: Net::FTP versus TLS by Graham Barr On Tue, May 27, 2003 at 04:57:36PM +0200, Dariush Pietrzak wrote:<br/>&gt; Hello,<br/>&gt; I&#39;m trying to contact TLS-enabled ftp servers, and so far the only option<br/>&gt; seems to be using lftp. <br/>&gt; AFAIK those extensions are described in RFC 2228...<br/>&gt; but by looking at it... it seems it would be enough to detect when user<br/>&gt; issues &#39;AUTH TLS&#39;, and then switch the connection to tls, using<br/>&gt; IO::Socket::SSL this could be simple...<br/>&gt; What are my options here? <br/><br/>Sadly its not that simple. I am working on a new libnet that will allow<br/>this but it is nowhere near ready yet. Until then your best option<br/>is using lftp<br/><br/>Graham.<br/> http://www.nntp.perl.org/group/perl.libnet/2003/05/msg71.html Tue, 27 May 2003 08:08:36 +0000 Net::FTP versus TLS by Dariush Pietrzak Hello,<br/> I&#39;m trying to contact TLS-enabled ftp servers, and so far the only option<br/>seems to be using lftp. <br/>AFAIK those extensions are described in RFC 2228...<br/>but by looking at it... it seems it would be enough to detect when user<br/>issues &#39;AUTH TLS&#39;, and then switch the connection to tls, using<br/>IO::Socket::SSL this could be simple...<br/> What are my options here? <br/><br/>-- <br/>Dariush Pietrzak,<br/>She swore and she cursed, that she never would deceive me<br/>Key fingerprint = 40D0 9FFB 9939 7320 8294 05E0 BCC7 02C4 75CC 50D9<br/> http://www.nntp.perl.org/group/perl.libnet/2003/05/msg70.html Tue, 27 May 2003 07:57:16 +0000 Re: PERL - TCP_NODELAY - How to set ? by Jan Pieter Cornet On Sat, Apr 26, 2003 at 12:38:43AM -0700, RAJASHEKHAR Y wrote:<br/>&gt; TCP_NODELAY problem in PERL<br/>&gt; <br/>&gt; When we are connecting to one server (as a client) our<br/>&gt; first message is properly received by the server and<br/>&gt; all the messages from the server are received by us<br/>&gt; but our second message and subsequent messages are not<br/>&gt; received at the server end due to TCP_NODELAY problem.<br/>&gt; How to set this TCP_NODELAY to avoid this problem ?<br/><br/>Er, a few points...<br/><br/>First, TCP_NODELAY should only be set (using setsockopt, see &quot;man setsockopt&quot;,<br/>&quot;man tcp&quot;, and &quot;perldoc -f setsockopt&quot;) when you have very fine timing<br/>demands. TCP_NODELAY settings should never cause a message to be lost<br/>(but it might receive a fraction of a second later than with<br/>TCP_NODELAY set). So, TCP_NODELAY is likely not the problem here.<br/><br/>Second, including a short fragment of code that illustrates the problem<br/>would be helpful.<br/><br/>Third, why are you Cc:ing this to me? Are you under the (wrongful) impression<br/>that I&#39;m an authority on TCP_NODELAY?<br/><br/>-- <br/>#!perl -pl # This kenny-filter is virus-free as long as you don&#39;t copy it<br/>$p=3-2*/[^\W\dmpf_]/i;s.[a-z]{$p}.vec($f=join(&#39;&#39;,$p-1?chr(sub{$_[0]*9+$_[1]*3+<br/>$_[2]}-&gt;(map{/p|f/i+/f/i}split//,$&amp;)+97):(&#39;m&#39;,p,f)[map{((ord$&amp;)%32-1)/$_%3}(9,<br/>3,1)]),5,1)=&#39;`&#39;lt$&amp;;$f.eig; # Jan-Pieter Cornet<br/> http://www.nntp.perl.org/group/perl.libnet/2003/04/msg69.html Sun, 27 Apr 2003 15:28:50 +0000 PERL - TCP_NODELAY - How to set ? by RAJASHEKHAR Y TCP_NODELAY problem in PERL<br/><br/>When we are connecting to one server (as a client) our<br/>first message is properly received by the server and<br/>all the messages from the server are received by us<br/>but our second message and subsequent messages are not<br/>received at the server end due to TCP_NODELAY problem.<br/>How to set this TCP_NODELAY to avoid this problem ?<br/><br/><br/>Rajashekhar Y<br/><br/>__________________________________<br/>Do you Yahoo!?<br/>The New Yahoo! Search - Faster. Easier. Bingo.<br/>http://search.yahoo.com<br/> http://www.nntp.perl.org/group/perl.libnet/2003/04/msg68.html Sat, 26 Apr 2003 02:26:42 +0000 Re: newbie: iconv.h: No such file or directory by Noah Garrett Wallach <br/>okay I am finding that the make test step of building Text-Iconv is<br/>failing. I must be missing something but I am not clearly reading the<br/>readme file. so I am not sure what to do here. anybody have some clues.<br/><br/>typhoon# pwd<br/>/usr/ports/distfiles/Text-Iconv-1.2<br/>typhoon# make test<br/>PERL_DL_NONLAZY=1 /usr/bin/perl -Iblib/arch -Iblib/lib<br/>-I/usr/libdata/perl/5.005<br/>03/mach -I/usr/libdata/perl/5.00503 -e &#39;use Test::Harness qw(&amp;runtests<br/>$verbose)<br/>; $verbose=0; runtests @ARGV;&#39; t/*.t<br/>t/00_load...........Can&#39;t load &#39;blib/arch/auto/Text/Iconv/Iconv.so&#39; for<br/>module T<br/>ext::Iconv: blib/arch/auto/Text/Iconv/Iconv.so: Undefined symbol<br/>&quot;libiconv_open&quot;<br/> at /usr/libdata/perl/5.00503/DynaLoader.pm line 169.<br/><br/> at t/00_load.t line 3<br/>BEGIN failed--compilation aborted at t/00_load.t line 3.<br/>dubious<br/> Test returned status 255 (wstat 65280, 0xff00)<br/>DIED. FAILED test 1<br/> Failed 1/1 tests, 0.00% okay<br/>t/01_charsets.......Can&#39;t load &#39;blib/arch/auto/Text/Iconv/Iconv.so&#39; for<br/>module T<br/>ext::Iconv: blib/arch/auto/Text/Iconv/Iconv.so: Undefined symbol<br/>&quot;libiconv_open&quot;<br/> at /usr/libdata/perl/5.00503/DynaLoader.pm line 169.<br/><br/> at t/01_charsets.t line 3<br/>BEGIN failed--compilation aborted at t/01_charsets.t line 3.<br/>dubious<br/> Test returned status 255 (wstat 65280, 0xff00)<br/>DIED. FAILED tests 1-13<br/> Failed 13/13 tests, 0.00% okay<br/>Failed Test Status Wstat Total Fail Failed List of failed<br/>-------------------------------------------------------------------------------<br/>t/00_load.t 255 65280 1 1 100.00% 1<br/>t/01_charsets.t 255 65280 13 13 100.00% 1-13<br/>Failed 2/2 test scripts, 0.00% okay. 14/14 subtests failed, 0.00% okay.<br/>*** Error code 2<br/><br/>Stop in /usr/ports/distfiles/Text-Iconv-1.2.<br/>typhoon#<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2003/04/msg67.html Wed, 02 Apr 2003 08:51:49 +0000 newbie: iconv.h: No such file or directory by Noah Garrett Wallach <br/>Okay I am new to installing Text-Iconv-1.2 perl module.<br/><br/>perl: 5.005_03<br/>OS: FreeBSD 4.7 Stable<br/>installed: libnet-1.0901, libiconv-1.8<br/><br/>currently arriving at an error when installing Text-Iconv-1.2<br/>any clues on this?<br/><br/><br/>typhoon# pwd<br/>/usr/ports/distfiles/Text-Iconv-1.2<br/>typhoon# make clean<br/>rm -rf Iconv.c ./blib Makefile.aperl<br/>blib/arch/auto/Text/Iconv/extralibs.all per<br/>lmain.c mon.out core so_locations pm_to_blib *~ */*~ */*/*~ *.o *.a<br/>perl.exe Ico<br/>nv.bs Iconv.bso Iconv.def Iconv.exp<br/>mv Makefile Makefile.old &gt; /dev/null 2&gt;&amp;1<br/>typhoon# perl Makefile.PL<br/>Checking if your kit is complete...<br/>Looks good<br/>Writing Makefile for Text::Iconv<br/>typhoon# make<br/>mkdir blib<br/>mkdir blib/lib<br/>mkdir blib/lib/Text<br/>cp Iconv.pm blib/lib/Text/Iconv.pm<br/>AutoSplitting blib/lib/Text/Iconv.pm (blib/lib/auto/Text/Iconv)<br/>/usr/bin/perl -I/usr/libdata/perl/5.00503/mach -I/usr/libdata/perl/5.00503<br/>/usr/<br/>libdata/perl/5.00503/ExtUtils/xsubpp -typemap<br/>/usr/libdata/perl/5.00503/ExtUtil<br/>s/typemap -typemap typemap Iconv.xs &gt;xstmp.c &amp;&amp; mv xstmp.c Iconv.c<br/>cc -c -DVERSION=\&quot;1.2\&quot; -DXS_VERSION=\&quot;1.2\&quot; -DPIC -fpic<br/>-I/usr/libdata/<br/>perl/5.00503/mach/CORE Iconv.c<br/>Iconv.xs:15: iconv.h: No such file or directory<br/>*** Error code 1<br/><br/>Stop in /usr/ports/distfiles/Text-Iconv-1.2.<br/>typhoon#<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2003/04/msg66.html Wed, 02 Apr 2003 07:46:12 +0000 How do I install Libnet?? by bguykill Hi. I want to use nemesis, but first I need libet. But I dont know how to<br/>isntall libnet. It says something about /configure, and make, and make<br/>installa nd etc. But I dotn knwo what that means. Can anyone help?<br/><br/> http://www.nntp.perl.org/group/perl.libnet/2003/03/msg65.html Sun, 30 Mar 2003 01:38:15 +0000