Re: How do I get a copy of log_server_status perl script for apache2?

[Greg Wooledge]

On Thu, May 06, 2021 at 11:30:25AM -0400, Steve Dondley wrote:
> 
> > So, I guess you would download an upstream Apache source tarball,
> > extract
> > it, and copy the log_server_status script out of the extracted tarball
> > and into /usr/local/bin.  Or wherever you want it.
> 
> Interesting. First time I've seen a debian package remove a file like that.
> 
> It can also be downloaded here: 
> https://svn.apache.org/viewvc/httpd/httpd/branches/2.4.x/support/log_server_status.in?view=log
> 
> Looks like the shebang line may be modified. It's not in a format I'm
> familiar with.

You're looking at "log_server_status.in" which is meant to be processed
by GNU autoconf to generate the actual log_server_status file.  All of
those @foo@ templates are placeholders that autoconf will replace with
other values.  (It's not just the shebang -- there are more.)

So, I guess copying it out of the source tree might have been a naive
suggestion.  You'll at least have to run the ./configure script in a way
that matches how the Debian package is built, and then probably build
most, or all, of Apache itself, in order to get a working perl script.

(Either that, or perform all of the substitutions by hand.)

Re: How do I get a copy of log_server_status perl script for apache2?

[Steve Dondley]

So, I guess you would download an upstream Apache source tarball, 
extract

it, and copy the log_server_status script out of the extracted tarball
and into /usr/local/bin.  Or wherever you want it.


Interesting. First time I've seen a debian package remove a file like 
that.


It can also be downloaded here: 
https://svn.apache.org/viewvc/httpd/httpd/branches/2.4.x/support/log_server_status.in?view=log


Looks like the shebang line may be modified. It's not in a format I'm 
familiar with.

Re: How do I get a copy of log_server_status perl script for apache2?

[Greg Wooledge]

On Thu, May 06, 2021 at 11:02:01AM -0400, Steve Dondley wrote:
> I have a stock apache2 server installed with apt-get. There is supposedly a
> perl script for getting machine-readable output of the apache status:
> http://httpd.apache.org/docs/2.4/programs/log_server_status.html
> 
> However, I can't find this script anywhere on my Debian Buster install and a
> package search turns up nothing except the documentation page I linked to
> above.
> 
> How do I get and install this script?

Looks like the Debian maintainer(s) of apache2 decided not to include
it.

https://packages.debian.org/buster/amd64/apache2-utils/filelist

So, I guess you would download an upstream Apache source tarball, extract
it, and copy the log_server_status script out of the extracted tarball
and into /usr/local/bin.  Or wherever you want it.

How do I get a copy of log_server_status perl script for apache2?

[Steve Dondley]

I have a stock apache2 server installed with apt-get. There is 
supposedly a perl script for getting machine-readable output of the 
apache status: 
http://httpd.apache.org/docs/2.4/programs/log_server_status.html


However, I can't find this script anywhere on my Debian Buster install 
and a package search turns up nothing except the documentation page I 
linked to above.


How do I get and install this script?

Re: Q: LDAP - perl script using Net::LDAP and start_tls gives an error

[Ric Moore]

On 04/13/2014 04:45 PM, Snow Leopard wrote:

Hi Atle,

in my case I am certificate agency (self-signed certificate) and I 
issue "private key" and "certificate" (cacert.pem) as for root "CA" as 
for LDAP server (server-key.pem and server-cert.pem) and LDAP perl 
script client (client-key.pem and client-cert.pem).


The script and client run on the same computer (for the moment) and 
LDAP server private key (private/server-key.pem) and certificate 
(certs/server-cert.pem) located in /etc/ssl/ directory. CA root 
certificate (certs/cacert.pem) is located in /etc/ssl/certs directory 
-- and as recommended I created certificate named using hash value


URL: https://metacpan.org/pod/Net::LDAP#start_tls

|ln -s cacert.pem `openssl x509 -hash -noout < cacert.pem`.0

Client (perl script) has reference to client's key/cert in the script 
which is stored in sub-directory 'certs' where located the script 
(certs/client-key.pem and certs/client-cert.pem).


At the moment I am not fully grasp why verification of server 
certificate fails.


I am welcome any ideas how to fix it.

NOTE: It is my first attempt to program with Net::LDAP and start_tls 
-- I am in process of learning how it works and how to program to use 
LDAP over TLS in perl.


Thanks for any input,

Andrew
|

On 4/13/2014 12:43 PM, Atle Solbakken wrote:


If I made a change in "start_tls" command for option "verify => 
none" to one of 'optional' or 'required' then I get next error message



root@install:~/prog# ./ldap_sec.pl
SSL connect attempt failed with unknown error error:14090086:SSL 
routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed at 
./ldap_sec.pl line 25,  line 751.

root@install:~/prog#




It seems to me that the "verify"-option tells Net::LDAP whether it 
should verify that the certificate the server you are connecting to 
is using has been signed by a known certificate authority (listed in 
/etc/ssl/certs).


start_tls will fail if the server does not provide any certificate, 
or if the certificate is not signed by a CA (ref 
http://search.cpan.org/~marschap/perl-ldap/lib/Net/LDAP.pod ).



I think it would be better if there was an easier way. Especailly for 
older non-elastic brains. :) Ric




--

My father, Victor Moore (Vic) used to say:

"There are two Great Sins in the world...

..the Sin of Ignorance, and the Sin of Stupidity.

Only the former may be overcome." R.I.P. Dad.

https://linuxcounter.net/cert/44256.png

X-oldie-warning: Toothless but still vicious



--
To UNSUBSCRIBE, email to debian-user-requ...@lists.debian.org 
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Archive: https://lists.debian.org/534afa9b.1000...@gmail.com

Re: Q: LDAP - perl script using Net::LDAP and start_tls gives an error

[Snow Leopard]

Hi Atle,

in my case I am certificate agency (self-signed certificate) and I issue 
"private key" and "certificate" (cacert.pem) as for root "CA" as for 
LDAP server (server-key.pem and server-cert.pem) and LDAP perl script 
client (client-key.pem and client-cert.pem).


The script and client run on the same computer (for the moment) and LDAP 
server private key (private/server-key.pem) and certificate 
(certs/server-cert.pem) located in /etc/ssl/ directory. CA root 
certificate (certs/cacert.pem) is located in /etc/ssl/certs directory -- 
and as recommended I created certificate named using hash value


URL: https://metacpan.org/pod/Net::LDAP#start_tls

|ln -s cacert.pem `openssl x509 -hash -noout < cacert.pem`.0

Client (perl script) has reference to client's key/cert in the script 
which is stored in sub-directory 'certs' where located the script 
(certs/client-key.pem and certs/client-cert.pem).


At the moment I am not fully grasp why verification of server 
certificate fails.


I am welcome any ideas how to fix it.

NOTE: It is my first attempt to program with Net::LDAP and start_tls -- 
I am in process of learning how it works and how to program to use LDAP 
over TLS in perl.


Thanks for any input,

Andrew
|

On 4/13/2014 12:43 PM, Atle Solbakken wrote:


If I made a change in "start_tls" command for option "verify => none" 
to one of 'optional' or 'required' then I get next error message



root@install:~/prog# ./ldap_sec.pl
SSL connect attempt failed with unknown error error:14090086:SSL 
routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed at 
./ldap_sec.pl line 25,  line 751.

root@install:~/prog#




It seems to me that the "verify"-option tells Net::LDAP whether it 
should verify that the certificate the server you are connecting to is 
using has been signed by a known certificate authority (listed in 
/etc/ssl/certs).


start_tls will fail if the server does not provide any certificate, or 
if the certificate is not signed by a CA (ref 
http://search.cpan.org/~marschap/perl-ldap/lib/Net/LDAP.pod ).


Atle.

Re: Q: LDAP - perl script using Net::LDAP and start_tls gives an error

[Atle Solbakken]

If I made a change in "start_tls" command for option "verify => none" 
to one of 'optional' or 'required' then I get next error message



root@install:~/prog# ./ldap_sec.pl
SSL connect attempt failed with unknown error error:14090086:SSL 
routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed at 
./ldap_sec.pl line 25,  line 751.

root@install:~/prog#




It seems to me that the "verify"-option tells Net::LDAP whether it 
should verify that the certificate the server you are connecting to is 
using has been signed by a known certificate authority (listed in 
/etc/ssl/certs).


start_tls will fail if the server does not provide any certificate, or 
if the certificate is not signed by a CA (ref 
http://search.cpan.org/~marschap/perl-ldap/lib/Net/LDAP.pod ).


Atle.


--
To UNSUBSCRIBE, email to debian-user-requ...@lists.debian.org 
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Archive: https://lists.debian.org/534ae8d2.1060...@goliathdns.no

Q: LDAP - perl script using Net::LDAP and start_tls gives an error

[Snow Leopard]

Hi,

I am trying to write perl script with Net::LDAP module, start_tls 
command and stumbled on a problem.


I would appreciate if somebody could point me to "the source of the 
problem".


If there is better place to get an assistance in resolution of the 
problem please indicate in your reply.


Thank you in advance,

Andrew


OS wheezy
slapd  2.4.31-1+nmu2
gnutls-bin 3.0.22-3+really2.12.20-8+deb7u1
cacert /etc/ssl/certs/cacert.pem -rw-r--r-- 1 openldap openldap
   /etc/ssl/certs/04a8f1dd.0 -> cacert.pem   lrwxrwxrwx 1 
root root

server-key /etc/ssl/private/server-key.pem-rw--- 1 openldap openldap
server-cert/etc/ssl/certs/server-cert.pem -rw-r--r-- 1 openldap openldap

--- Begin of ldap_sec.pl --
#!/usr/bin/perl

use Net::LDAP;
#use Net::LDAP::Util qw(ldap_error_text);;
use Data::Dumper;

my $server = 'install.myclub.com';  #'localhost';
my $base   = 'dc=myclub,dc=com';
my $scope  = 'sub';
my $filter = 'objectClass=*';

my $ldap = Net::LDAP->new( $server ) or die "$@";

my $mesg = $ldap->bind( version => 3 ) || die "Could not bind...";

$mesg = $ldap->start_tls(
verify => 'none',   # none, optional, require
clientcert => 'certs/client-cert.pem',
clientkey  => 'certs/client-key.pem',
keydecrypt => sub { 'secret'; },
capath => '/etc/ssl/certs/'
);

$mesg->{resultCode} && die $mesg->{errorMessage};
#print Dumper($mesg); exit 0;

$mesg = $ldap->search(
base   => $base,
#scope  => $sub,
filter => $filter
);


#print Dumper($mesg);

if ($mesg->{resultCode}) {
die "An error occured binding to the LDAP server: "
  . $mesg->{errorMessage} . "\n";
}

foreach my $entry ( $mesg->entries ) {
$entry->dump;
}

$mesg = $ldap->unbind;
--- End of ldap_sec.pl -


If the script run as it embedded above then it produces correct output


root@install:~/prog# ./ldap_sec.pl

dn:dc=myclub,dc=com

objectClass: top
 dcObject
 organization
  o: myclub.com
 dc: myclub

dn:cn=admin,dc=myclub,dc=com

objectClass: simpleSecurityObject
 organizationalRole
 cn: admin
description: LDAP administrator
root@install:~/prog#


If I made a change in "start_tls" command for option "verify => none" to 
one of 'optional' or 'required' then I get next error message



root@install:~/prog# ./ldap_sec.pl
SSL connect attempt failed with unknown error error:14090086:SSL 
routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed at 
./ldap_sec.pl line 25,  line 751.

root@install:~/prog#


Otherwise LDAP server allows to bind and retrieve information from 
command line



root@install:~/prog# ldapsearch -ZZ -H ldap:/// -W  -D 
'cn=admin,dc=myclub,dc=com'

Enter LDAP Password:
# extended LDIF
#
# LDAPv3
# base  (default) with scope subtree
# filter: (objectclass=*)
# requesting: ALL
#

# myclub.com
dn: dc=myclub,dc=com
objectClass: top
objectClass: dcObject
objectClass: organization
o: myclub.com
dc: myclub

# admin, myclub.com
dn: cn=admin,dc=myclub,dc=com
objectClass: simpleSecurityObject
objectClass: organizationalRole
cn: admin
description: LDAP administrator
userPassword:: {encrypted_password}### password removed

# search result
search: 3
result: 0 Success

# numResponses: 3
# numEntries: 2
root@install:~/prog#


--
To UNSUBSCRIBE, email to debian-user-requ...@lists.debian.org 
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Archive: https://lists.debian.org/534acd33.7000...@gmail.com

Re: Call for testers - perl script to connect to the Juniper VPN

[Rob Owens]

On Tue, Jul 24, 2012 at 03:00:24PM +0200, Alex Samorukov wrote:
> Hello,
> 
> I wrote a Perl script to connect to the Juniper VPN from Linux. It
> works without Java and requires perl only. I used wireshark to
> analyze management protocol of the juniper binary to emulate java
> GUI behaviour. If you are using Juniper VPN with Java client and
> want to test my script - it is available at 
> http://smallhacks.wordpress.com/2012/07/15/jvpn-perl-script-to-connect-to-the-juniper-vpn-with-host-checker-enabled/
> . Comments and bugreports are welcome. Also i am going to do debian
> package, after some positive reports.
> 
A couple years ago I would have been happy to test this for you, but I
switched jobs and no longer have access to a Juniper VPN.  But when I
did, I found that there was a way to do some port forwarding on the
Juniper VPN which allowed me to ssh into a Linux server from an off-site
Linux client.  I don't remember the term Juniper used for that function,
unfortunately.

-Rob


-- 
To UNSUBSCRIBE, email to debian-user-requ...@lists.debian.org 
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org
Archive: http://lists.debian.org/20120725015718.ga12...@aurora.owens.net

Re: Call for testers - perl script to connect to the Juniper VPN

[Alex Samorukov]

On 07/24/2012 05:44 PM, Darac Marjal wrote:

works without Java and requires perl only. I used wireshark to
analyze management protocol of the juniper binary to emulate java
GUI behaviour. If you are using Juniper VPN with Java client and
want to test my script - it is available at 
http://smallhacks.wordpress.com/2012/07/15/jvpn-perl-script-to-connect-to-the-juniper-vpn-with-host-checker-enabled/
. Comments and bugreports are welcome. Also i am going to do debian
package, after some positive reports.

Thank you, and I hope that it is not offtopic in this list.
Am I right in thinking that this doesn't completely replace Juniper's
software, but is more akin to mad-scientist's connection script? Does
that mean it's still limited to i386 architecture?

It is more advanced then mad-scientist's connection script because it 
using TCP for IPC with vpn process, like native gui do. Also it is 
downloading client without web browser and Java. In my case it allows to 
connect to the VPN server with "host checker" enabled, what is not 
possible with normal command line used in mad-scientist's script. I am 
using it on x86_64 architecture, with ia32-libs installed and it works fine.


The only problem is that this IPC communication was done only by 
analysing tcp dumps on my system, so I can`t guarantee that this will 
work with other VPN servers. This is the reason i am asking for testing.



--
To UNSUBSCRIBE, email to debian-user-requ...@lists.debian.org 
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Archive: http://lists.debian.org/500eecb3.2070...@os2.kiev.ua

Re: Call for testers - perl script to connect to the Juniper VPN

[Darac Marjal]

On Tue, Jul 24, 2012 at 03:00:24PM +0200, Alex Samorukov wrote:
> Hello,
> 
> I wrote a Perl script to connect to the Juniper VPN from Linux. It
> works without Java and requires perl only. I used wireshark to
> analyze management protocol of the juniper binary to emulate java
> GUI behaviour. If you are using Juniper VPN with Java client and
> want to test my script - it is available at 
> http://smallhacks.wordpress.com/2012/07/15/jvpn-perl-script-to-connect-to-the-juniper-vpn-with-host-checker-enabled/
> . Comments and bugreports are welcome. Also i am going to do debian
> package, after some positive reports.
> 
> Thank you, and I hope that it is not offtopic in this list.

Am I right in thinking that this doesn't completely replace Juniper's
software, but is more akin to mad-scientist's connection script? Does
that mean it's still limited to i386 architecture?



signature.asc
Description: Digital signature

Call for testers - perl script to connect to the Juniper VPN

[Alex Samorukov]

Hello,

I wrote a Perl script to connect to the Juniper VPN from Linux. It works 
without Java and requires perl only. I used wireshark to analyze 
management protocol of the juniper binary to emulate java GUI behaviour. 
If you are using Juniper VPN with Java client and want to test my script 
- it is available at 
http://smallhacks.wordpress.com/2012/07/15/jvpn-perl-script-to-connect-to-the-juniper-vpn-with-host-checker-enabled/ 
. Comments and bugreports are welcome. Also i am going to do debian 
package, after some positive reports.


Thank you, and I hope that it is not offtopic in this list.


--
To UNSUBSCRIBE, email to debian-user-requ...@lists.debian.org 
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Archive: http://lists.debian.org/500e9c68.7060...@os2.kiev.ua

Re: Why does browser want to open up perl script with editor?

[Alexander Schmehl]

Hi!

* Fred OGrady <[EMAIL PROTECTED]> [051009 05:01]:

> from: file:///usr/local/sql-ledger/index.html I click on "Logon" (a link to
> file:///usr/local/sql-ledger/logon.pl). My Browser wants to open
> logon.plwith my default text editor. I am sure I have the permissions
> set to
> execute.
> 
> Apache has no problems executing other cgi scripts. It has got to be
> something simple, could anyone point me in the right direction (which RTFM)?

If you access is via file:// you are not using your apache, but
accessing the file directly.


Yours sincerely,
  Alexander

-- 
http://learn.to/quote/
http://www.catb.org/~esr/faqs/smart-questions.html


signature.asc
Description: Digital signature

Re: Why does browser want to open up perl script with editor?

[Patrick Wiseman]

On 10/8/05, Fred OGrady <[EMAIL PROTECTED]> wrote:
Hi everyone,

I know I must be doing something wrong here:

I am trying to configure sql-ledger.

from:  file:///usr/local/sql-ledger/index.html I click on "Logon"
(a link to file:///usr/local/sql-ledger/logon.pl).  My Browser
wants to open logon.pl with my default text editor.  I am sure I
have the permissions set to execute. 

Apache has no problems executing other cgi scripts.  It has got to
be something simple,  could anyone point me in the right direction
(which RTFM)?

Does httpd.conf know that .pl files are to be treated as executable?

Patrick

Why does browser want to open up perl script with editor?

[Fred OGrady]

Hi everyone,

I know I must be doing something wrong here:

I am trying to configure sql-ledger.

from:  file:///usr/local/sql-ledger/index.html I click on "Logon"
(a link to file:///usr/local/sql-ledger/logon.pl).  My Browser
wants to open logon.pl with my default text editor.  I am sure I
have the permissions set to execute. 

Apache has no problems executing other cgi scripts.  It has got to
be something simple,  could anyone point me in the right direction
(which RTFM)?

It is not a critical application, but I would like to know where I am going wrong.

(I also know I probably shouldn't be running x on this "desktop"/server either, but performance hasn't been a problem.-- Fred OGradyLinux+ Certified Technician Blog @  
http://vs6.resco.kicks-ass.net:8080

Re: How Can I Schedule A Perl Script?

[Lorenzo Taylor]

-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

You can run a perl script from a cron job just like any other program.  As the
user whose home directory the file is in:

crontab -e

and in the file put
0,30 * * * * ~/doc/id.pl

Note that the /home/user part can be replaced with ~ just like in the shell
since the configuration is in that user's crontab.  You actually could even take
the ~/ out altogether, since cron starts in the home directory of the user whose
crontab it runs.

Lorenzo

- -- 
- -BEGIN GEEK CODE BLOCK-
Version: 3.12
GCS d- s:+ a- C+++ UL P+ L+++ E- W++ N o K- w---
O M V- PS+++ PE Y+ PGP++ t++ 5+ X+ R tv-- b++ DI-- D+
G e* h r+++ y+++
- --END GEEK CODE BLOCK--
-BEGIN PGP SIGNATURE-
Version: GnuPG v1.4.1 (GNU/Linux)

iD8DBQFC3GVEG9IpekrhBfIRAgYvAJ9AIDVtGAJwR2fPbzYPoSWl4nW4DgCfe5i6
rt+mBoEhBjowAsQkhAuOg0c=
=72Yf
-END PGP SIGNATURE-


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: How Can I Schedule A Perl Script?

[Roberto C. Sanchez]

On Sun, Jul 17, 2005 at 11:45:06PM -0300, Eduardo B. V. Pereira wrote:
> I have a perl script that needs to be runned each 30
> minutes, how can I do this? Can I use cron? If so what
> would the configuration line would be? The path to the
> script is /home/user/doc/id.pl
> I'm running a stable sarge.
> 

Mark the script as executable, make sure the first line is
#!/usr/bin/perl (or something suitable) and add a crontab entry with the
absolute path to the file.

-Roberto
-- 
Roberto C. Sanchez
http://familiasanchez.net/~sanchezr


pgpj7AmkHL0g3.pgp
Description: PGP signature

Re: How Can I Schedule A Perl Script?

[Michael Ott]

Hello

> I have a perl script that needs to be runned each 30
> minutes, how can I do this? Can I use cron? If so what
> would the configuration line would be? The path to the
> script is /home/user/doc/id.pl
You can use cron
crontab -e as normal user and
0,30 * * * * /home/user/doc/id.pl

or you can use sleep
sleep EXPR
sleep
Causes the script to sleep for EXPR seconds, or forever if no EXPR.
May be interrupted by sending the process a SIGALRM. Returns the 
number of seconds actually slept. You probably cannot mix alarm()
and sleep() calls, because sleep() is often implemented using 
alarm().

On some older systems, it may sleep up to a full second less than
what you requested, depending on how it counts seconds. Most modern
systems always sleep the full amount.

For delays of finer granularity than one second, you may use Perl's
syscall() interface to access setitimer(2) if your system supports
it, or else see select() below.

See also the POSIX module's sigpause() function. 

CU
 
  Michael  
  
--   
   Michael Ott, e-mail: [EMAIL PROTECTED], www.zolnott.de   
I am registered as user #275453 with the Linux Counter, http://counter.li.org.


pgpN8EmqdCRPB.pgp
Description: PGP signature

Re: How Can I Schedule A Perl Script?

[Anders Breindahl]

On Monday 18 July 2005 04:55, Stephen R Laniel wrote:
 > Caveat: if this job needs to run with root privileges, then
 > you'll need to edit the global crontab in /etc/crontab.

Unless I'm mistaken, root should rather add her custom cronjobs to her own 
crontab by running `crontab -e` herself. Works for me, anyhow.

Anders Breindahl.


pgpOV6iRSfqhj.pgp
Description: PGP signature

How Can I Schedule A Perl Script?

[Eduardo B. V. Pereira]

I have a perl script that needs to be runned each 30
minutes, how can I do this? Can I use cron? If so what
would the configuration line would be? The path to the
script is /home/user/doc/id.pl
I'm running a stable sarge.

Thanks,
e.pereira

__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: How Can I Schedule A Perl Script?

[Stephen R Laniel]

On Sun, Jul 17, 2005 at 11:48:49PM -0300, [EMAIL PROTECTED] wrote:
> I have a perl script that needs to be runned each 30
> minutes, how can I do this? Can I use cron? If so what
> would the configuration line would be? The path to the
> script is /home/user/doc/id.pl
> I'm running a stable sarge.

Yes, you'll use cron. To get a job to run at the 1st and
30th minute of every hour, type 'crontab -e' to edit your
own cron jobs (but see caveat below), then type

1,30 * * * * /home/user/doc/id.pl

The editor for cron files is whatever you've set in your
EDITOR environment variable -- emacs or vim or nano or
whatever.

Caveat: if this job needs to run with root privileges, then
you'll need to edit the global crontab in /etc/crontab.

-- 
Stephen R. Laniel
[EMAIL PROTECTED]
+(617) 308-5571
http://laniels.org/
PGP key: http://laniels.org/slaniel.key


signature.asc
Description: Digital signature

How Can I Schedule A Perl Script?

[pvbedu-debian]

I have a perl script that needs to be runned each 30
minutes, how can I do this? Can I use cron? If so what
would the configuration line would be? The path to the
script is /home/user/doc/id.pl
I'm running a stable sarge.

Thanks,
e.pereira





___ 
Yahoo! Acesso Grátis - Internet rápida e grátis. 
Instale o discador agora! http://br.acesso.yahoo.com/


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

[OT] multi_upload_file perl script that works

[Antonio Rodriguez]

OT, by a frustrated perl programmer wooanabee

Would anybody care to share a multifile upload cgi script that
actually works? All the ways and google results that I have tried fail
at some point.
TIATARPP
  (2 all real perl programmers)


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: starting Perl script from inetd

[Bob Proulx]

[EMAIL PROTECTED] wrote:
> Trying to start a Perl smtp(port 25) server from inetd.
> Script works OK as stand alone but fails to start from inetd.

Hopefully it has been designed to be run from inetd.

> Question 1: Is there a way to log inetd?

Information and errors is logged via syslogd.  This usually logs to
/var/log/syslog as configured by /etc/syslog.conf.

> Question 2: should the server be started differently for inetd (as 
> compared to a standalone server)

Yes, very much so.  Normal daemons fork into the background and
disassociate from the terminal.  Normal daemons will need to open
their own network ports.  But daemons from inetd expect all of that to
have happened already.  Plus traditional inetds only open file
descriptor zero for reading and writing whereas newer versions open up
fd 1 and 2 as well because it is simpler for simple programs like perl
scripts.

There are many details here.  I don't even know where to begin to
describe the process.  Googling for how to write a unix daemon and
other things would turn up good information.

> netstat shows . . .
> :~> netstat -ntalc | grep ':25'
> tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
> tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
> tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
> tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
> tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN

That does not look normal.  How can you have five of them running at
once?  Very odd.

> tcp   0  0 127.0.0.1:33052127.0.0.1:25 CLOSE_WAIT

And yet another one bound specifically to localhost.  It does not look
happy to me.

>   -- upon attempting to telnet to port 25 . . .
> :~> telnet localhost 25
> Trying ::1...
> telnet: connect to address ::1: Connection refused
> Trying 127.0.0.1...
> Connected to localhost.
> Escape character is '^]'.
> Failed to start server :Address already in use
>  (in cleanup) Can't call method "close" on an undefined value at 
> /usr/lib/perl5/site_perl/5.6.1/Net/SMTP/Server.pm line 55.
> Connection closed by foreign host.

This really looks like inetd was listening on port 25, started up your
perl script, your perl tried to open port 25 again.  Of course that
won't work.

>   -- some of different ways I have tried to start the server
> my $srv = new Net::SMTP::Server( 'localhost', 25 )
> my $srv = new Net::SMTP::Server( '0.0.0.0', 25 )
> my $srv = new Net::SMTP::Server( , 25 )
> my $srv = new Net::SMTP::Server( )
> 
> none have behaved any differently

If you are starting from inetd then don't try to open any network
ports.  Just read and write from stdin and stdout.  (In the old inetd
you would have needed to write to fd 0 as well.  But for newer
versions just write to stdout.)  Remove all of the network operations
from your perl script and try again.

You should be able to test your script by talking to it
interactively.  Try running 'sendmail -bs' for a compison.

  /usr/sbin/sendmail -bs
  220 discord.proulx.com ESMTP Postfix (Debian/GNU)
  EHLO localhost
  ...

You are creating an SMTP replacement and so it must behave the same.
If your script does not behave the same way then you need to fix it so
that it does.

Bob


pgpgJIin6Ijn9.pgp
Description: PGP signature

Re: starting Perl script from inetd

[Stephen Patterson]

On Sun, 27 Jun 2004 20:20:05 +0200, <[EMAIL PROTECTED]> wrote:
>
> Trying to start a Perl smtp(port 25) server from inetd.

> Failed to start server :Address already in use
>  (in cleanup) Can't call method "close" on an undefined value at 
> /usr/lib/perl5/site_perl/5.6.1/Net/SMTP/Server.pm line 55.
> Connection closed by foreign host.

Sounds like you've got something else running on port 25.

-- 
Stephen Patterson http://patter.mine.nu/
[EMAIL PROTECTED]  remove SPAM to reply
Linux Counter No: 142831 GPG Public key: 252B8B37
Caution: breathing may be hazardous to your health.


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

starting Perl script from inetd

[socrel]

Trying to start a Perl smtp(port 25) server from inetd.

Script works OK as stand alone but fails to start from inetd.
(In fact this has reached you through the same code, but running on a 
different port)

Question 1: Is there a way to log inetd?

Question 2: should the server be started differently for inetd (as 
compared to a standalone server)



Some of the stuff I have looked at so far:

  -- line from /etc/inetd . . .
smtp stream tcp nowait root /usr/local/bin/msmtp

  -- upon attempting to send mail from MUA (mozilla mail), fails 
immediately saying "Unable to connect to SMTP server 'localhost'"

netstat shows . . .
:~> netstat -ntalc | grep ':25'
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 127.0.0.1:33052127.0.0.1:25 CLOSE_WAIT
tcp   0  0 127.0.0.1:25   127.0.0.1:33052  FIN_WAIT2
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 127.0.0.1:33052127.0.0.1:25 CLOSE_WAIT
tcp   0  0 127.0.0.1:25   127.0.0.1:33052  FIN_WAIT2
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN

  -- upon attempting to telnet to port 25 . . .
:~> telnet localhost 25
Trying ::1...
telnet: connect to address ::1: Connection refused
Trying 127.0.0.1...
Connected to localhost.
Escape character is '^]'.
Failed to start server :Address already in use
 (in cleanup) Can't call method "close" on an undefined value at 
/usr/lib/perl5/site_perl/5.6.1/Net/SMTP/Server.pm line 55.
Connection closed by foreign host.

netstat shows . . .
:~> netstat -ntalc | grep ':25'
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 127.0.0.1:33069127.0.0.1:25 ESTABLISHED
tcp   0  0 127.0.0.1:25   127.0.0.1:33069  ESTABLISHED
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN
tcp   0  0 127.0.0.1:25   127.0.0.1:33069  TIME_WAIT
tcp   0  0 0.0.0.0:25 0.0.0.0:*LISTEN

  -- some of different ways I have tried to start the server
my $srv = new Net::SMTP::Server( 'localhost', 25 )
my $srv = new Net::SMTP::Server( '0.0.0.0', 25 )
my $srv = new Net::SMTP::Server( , 25 )
my $srv = new Net::SMTP::Server( )

none have behaved any differently

Thanks


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: Need a shell or perl script

[Monique Y. Herman]

On 2004-02-23, Deboo penned:
> On Sun, 22 Feb 2004, Monique Y. Herman wrote:
>
>> On 2004-02-22, Deboo penned:
>> > but I know neither. Not that I do not want to learn, but I need
>> > help to get this list. Can anyone help me out by giving the
>> > commands needed to do this? If they think this I am asking for mass
>> > e-mail, then I could make a dir listing of the mailboxes and send
>> > you the list so you know these are my friends and not some spam
>> > thing I am asking.
>> >
>>
>> You might look at /usr/share/doc/tmda/contrib/collectaddys from the
>> tmda package.  It creates a list of email addresses from your
>> existing mailboxes.  You'd have to hack it to add in aliases, though.
>
> I'm using woody with backports and I don't have collectaddys under
> that folder. I checked with packages.debian.org but couldn't find it
> in either stable, testing or unstable. Can you tell me where to get
> this package? Or is it a non-debian package?
>
> Regards, Deboo
>

Since we're only talking about one file out of the whole package, just
grab the source release from http://www.tmda.net/download.html ...
you'll find collectaddys under contrib.  You do need to have python
installed to run it.

-- 
monique


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: Need a shell or perl script

[Deboo]

On Sun, 22 Feb 2004, Monique Y. Herman wrote:

> On 2004-02-22, Deboo penned:
> > but I know neither. Not that I do not want to learn, but I need help
> > to get this list. Can anyone help me out by giving the commands needed
> > to do this? If they think this I am asking for mass e-mail, then I
> > could make a dir listing of the mailboxes and send you the list so you
> > know these are my friends and not some spam thing I am asking.
> >
>
> You might look at /usr/share/doc/tmda/contrib/collectaddys
> from the tmda package.  It creates a list of email addresses from your
> existing mailboxes.  You'd have to hack it to add in aliases, though.

I'm using woody with backports and I don't have collectaddys under that
folder. I checked with packages.debian.org but couldn't find it in either
stable, testing or unstable. Can you tell me where to get this package? Or
is it a non-debian package?

Regards,
Deboo


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: Need a shell or perl script

[Monique Y. Herman]

On 2004-02-22, Deboo penned:
> Over the years, I have been using many email clients from windows to
> linux and have been saving lots of old personal emails. I have many
> them in many different formats as per the MUA. They are a lot.
>
> Now, I could search for one or two email addresses whenever I need to,
> having kept all these different mailboxes in one directory. Never
> having made an addressbook, is what caused this problem. I would like
> to sort, search and make a list of the email addresses. I know qute
> many of these addresses have become invalid over the years and some
> friends' addresses are more than one or two, but still a list would be
> nice. I know it can be done with shell scripting and better with perl
> but I know neither. Not that I do not want to learn, but I need help
> to get this list. Can anyone help me out by giving the commands needed
> to do this? If they think this I am asking for mass e-mail, then I
> could make a dir listing of the mailboxes and send you the list so you
> know these are my friends and not some spam thing I am asking.
>

You might look at /usr/share/doc/tmda/contrib/collectaddys
from the tmda package.  It creates a list of email addresses from your
existing mailboxes.  You'd have to hack it to add in aliases, though.


-- 
monique


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: Need a shell or perl script

[Gregory Seidman]

On Sun, Feb 22, 2004 at 10:51:58PM +0530, Deboo wrote:
} Over the years, I have been using many email clients from windows to linux
} and have been saving lots of old personal emails. I have many them in many
} different formats as per the MUA. They are a lot.
} 
} Now, I could search for one or two email addresses whenever I need to,
} having kept all these different mailboxes in one directory. Never having
} made an addressbook, is what caused this problem. I would like to sort,
} search and make a list of the email addresses. I know qute many of these
} addresses have become invalid over the years and some friends' addresses
} are more than one or two, but still a list would be nice. I know it can be
} done with shell scripting and better with perl but I know neither. Not
} that I do not want to learn, but I need help to get this list. Can anyone
} help me out by giving the commands needed to do this? If they think this I
} am asking for mass e-mail, then I could make a dir listing of the
} mailboxes and send you the list so you know these are my friends and not
} some spam thing I am asking.

I'm assuming your mailboxes are in some reasonable format where email
addresses are encoded in ascii and separated from other text by either
space or control characters. This is a moderately reasonable assumption.

cat  |\
awk -F '[ \000-\0026]' '/@/ { for (i=0;i

Re: Need a shell or perl script

[Bijan Soleymani]

On Sun, Feb 22, 2004 at 10:51:58PM +0530, Deboo wrote:
> Now, I could search for one or two email addresses whenever I need to,
> having kept all these different mailboxes in one directory. Never having
> made an addressbook, is what caused this problem. I would like to sort,
> search and make a list of the email addresses. I know qute many of these
> addresses have become invalid over the years and some friends' addresses
> are more than one or two, but still a list would be nice. I know it can be
> done with shell scripting and better with perl but I know neither.

If they are in a plain text format (mbox, maildir, mh), then you can
simply use grep. Basically you want to get the from line from each
email message. To do that you simply search for lines starting with
"From: ". To do that you tell grep to search for "^From:" where '^'
represents the beginning of a line. Then you want to take the results
and put them in a file so you tell the shell to put the output in a file
by using '>' to redirect the output to a file. This will clear the file if
it already exists, if you want to add to the end of an existing file you
use ">>".

mbox:
grep "^From: " INBOX debian-user some-other-mbox > list-of-emails

maildir:
grep "^From: " INBOX/cur/* debian-user/cur/* some-other-maildir/cur/* > list-of-emails

mh:
grep "^From: " INBOX/* debian-user/* some-other-mh/* > list-of-emails

o  Once you have all the email addresses in a file you want to:
   remove the "From: " from the beginning of each line.

o  Remove duplicate email addresses.

o  Sort the list.

To remove the "From: " you can use sed (a simple filter/editor).
You simply tell script to replace "From: " with nothing whenever it
occurs at the beginning of a line. This can be done with the s (substitution)
command:

sed "s/^From: //" list-of-emails > list-of-emails-without-from

Now you can sort the emails using sort:
sort list-of-emails-without-from > list-of-emails-sorted

Now you can get rid of duplicates using uniq:
uniq list-of-emails-sorted > list-of-emails-sorted-unique

And now you should be on your way to getting what you want.

Bijan
-- 
Bijan Soleymani <[EMAIL PROTECTED]>
http://www.crasseux.com


signature.asc
Description: Digital signature

Need a shell or perl script

[Deboo]

Over the years, I have been using many email clients from windows to linux
and have been saving lots of old personal emails. I have many them in many
different formats as per the MUA. They are a lot.

Now, I could search for one or two email addresses whenever I need to,
having kept all these different mailboxes in one directory. Never having
made an addressbook, is what caused this problem. I would like to sort,
search and make a list of the email addresses. I know qute many of these
addresses have become invalid over the years and some friends' addresses
are more than one or two, but still a list would be nice. I know it can be
done with shell scripting and better with perl but I know neither. Not
that I do not want to learn, but I need help to get this list. Can anyone
help me out by giving the commands needed to do this? If they think this I
am asking for mass e-mail, then I could make a dir listing of the
mailboxes and send you the list so you know these are my friends and not
some spam thing I am asking.

Thanks and Regards,
Deboo


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: segfault while loading perl script on irssi.

[Dave Carrigan]

On Thu, Oct 02, 2003 at 06:05:25PM +0200, flibus wrote:
> 
>I took a look on bugs.debian.org but i didn't find any bug
>report about this one. I'm on a testing/unstable debian with a
>2.4.21 kernel taken from the kernel source pacakges and
>irssi segfault while i want to load perl scripts.
>In /etc/apt/source.list i got :
>
>deb http://ftp.us.debian.org/debian/ unstable main non-free contrib
>deb-src http://ftp.us.debian.org/debian/ unstable main non-free
> 
> 
> I'm not sure of the packages which got a problem 
> (if one got a problem) and i don't know other people
> who got the same problem (i didn't really search).
> So if you got a solution don't hesitate to reply :) 

It's related to the perl 5.8.1 upgrade. Supposedly, 5.8.1 is ABI
compatible with 5.8.0, but it seems that it is not, because software
that has an embedded perl interpreter seems to be segfaulting (mod_perl,
irssi, xchat, etc.). This was discussed a bit on debian-perl, but I
don't know if any bugs were filed. 

In the meantime, you can rebuild irssi, or you can downgrade perl.

-- 
Dave Carrigan
Seattle, WA, USA
[EMAIL PROTECTED] | http://www.rudedog.org/ | ICQ:161669680
UNIX-Apache-Perl-Linux-Firewalls-LDAP-C-C++-DNS-PalmOS-PostgreSQL-MySQL

Dave is currently listening to Bob Dylan - I And I (Real Live)


signature.asc
Description: Digital signature

segfault while loading perl script on irssi.

[flibus]

   I took a look on bugs.debian.org but i didn't find any bug
   report about this one. I'm on a testing/unstable debian with a
   2.4.21 kernel taken from the kernel source pacakges and
   irssi segfault while i want to load perl scripts.
   In /etc/apt/source.list i got :
   
   deb http://ftp.us.debian.org/debian/ unstable main non-free contrib
   deb-src http://ftp.us.debian.org/debian/ unstable main non-free


I'm not sure of the packages which got a problem 
(if one got a problem) and i don't know other people
who got the same problem (i didn't really search).
So if you got a solution don't hesitate to reply :) 

-- 
Kostas ioannis aka flibus   [EMAIL PROTECTED]
{EPITECH.} promo 2006
"You want of display the details or all employees whose last names is Smith."


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: catch the output of an app in a perl script

[Michael Naumann]

07.12.2002 01:18:56, Shyamal Prasad <[EMAIL PROTECTED]> wrote:

>It's been some years since I've done real perl programming (thank God
>for Python!), but the original poster might find it interesting that
>the "pipe open" syntax allows the program to read the output when it
>is ready. The backquotes require that the program have enough memory
>to collect the program output at one time. If there is a lot of
>output, that might be worth thinking about.
>
>Or have I completely forgotten perl?

No, you haven't.
If space is an issue, the pipe open technique is a remedy.
Also in case you want to process output that drops by during a long 
period of time.

Yet, (for me) in most cases, the backticks are sufficient and
slightly more easy to use.

Cheers, Michael






-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: catch the output of an app in a perl script

[Colin Watson]

On Fri, Dec 06, 2002 at 06:18:56PM -0600, Shyamal Prasad wrote:
> "Michael" == Michael Naumann <[EMAIL PROTECTED]> writes:
> 
> Michael> On Friday 06 December 2002 12:56, Colin Watson wrote:
> >> Use the "pipe open" syntax. The perlopentut man page will help.
> 
> Michael> Or even easier, use $output = `cmd`; or @output = `cmd`;
> 
> It's been some years since I've done real perl programming (thank God
> for Python!), but the original poster might find it interesting that
> the "pipe open" syntax allows the program to read the output when it
> is ready. The backquotes require that the program have enough memory
> to collect the program output at one time. If there is a lot of
> output, that might be worth thinking about.
> 
> Or have I completely forgotten perl?

No, you're right. I tend to reserve backquotes for "quick and dirty"
scripting - but this just illustrates that there's more than one way to
do it.

-- 
Colin Watson  [[EMAIL PROTECTED]]


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: catch the output of an app in a perl script

[Shyamal Prasad]

"Michael" == Michael Naumann <[EMAIL PROTECTED]> writes:

Michael> On Friday 06 December 2002 12:56, Colin Watson wrote:
>> On Fri, Dec 06, 2002 at 12:35:08PM +0100, Raffaele Sandrini
>> wrote: > How can i catch the output of a program runned in a
>> perl script?
>> 
>> Use the "pipe open" syntax. The perlopentut man page will help.

Michael> Or even easier, use $output = `cmd`; or @output = `cmd`;

It's been some years since I've done real perl programming (thank God
for Python!), but the original poster might find it interesting that
the "pipe open" syntax allows the program to read the output when it
is ready. The backquotes require that the program have enough memory
to collect the program output at one time. If there is a lot of
output, that might be worth thinking about.

Or have I completely forgotten perl?

/Shyamal


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: catch the output of an app in a perl script

[Michael Naumann]

On Friday 06 December 2002 12:56, Colin Watson wrote:
> On Fri, Dec 06, 2002 at 12:35:08PM +0100, Raffaele Sandrini wrote:
> > How can i catch the output of a program runned in a perl script? 
> 
> Use the "pipe open" syntax. The perlopentut man page will help.

Or even easier, use
$output = `cmd`;
or
@output = `cmd`;

-- Michael


--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: catch the output of an app in a perl script

[Colin Watson]

On Fri, Dec 06, 2002 at 12:35:08PM +0100, Raffaele Sandrini wrote:
> How can i catch the output of a program runned in a perl script? 

Use the "pipe open" syntax. The perlopentut man page will help.

Cheers,

-- 
Colin Watson  [[EMAIL PROTECTED]]


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

catch the output of an app in a perl script

[Raffaele Sandrini]

 Hi 
 
How can i catch the output of a program runned in a perl script? 
 
the "system()" command returns the return value of a app, doesn't it? 
do i have to do something like "read()" ? 
 
cheers, 
Raffaele 

-- 
+++ GMX - Mail, Messaging & more  http://www.gmx.net +++
NEU: Mit GMX ins Internet. Rund um die Uhr für 1 ct/ Min. surfen!


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: mirror, the perl script mirroring package

[Alex Malinovich]

On Wed, 2002-06-19 at 15:02, Walter Tautz wrote:

> > I am attempting to setup a local private mirror of debian using the perl 
> > script package. It has run for several days. It quits from time to time and
> > waits for the next initiation event from crontab, but it can't seem to clear
> > its queue of requests to set up softlink into the pool. I've tried pointing 
> > it
> > to a couple of different debian mirrors and get the same results for both.
> 
> I would suggest using the scripts on the main debian site. Look for info
> about how to mirror the site. I prefer using rsync
> 
> search the site for 'mirror' or just go to:
> http://www.debian.org/mirror/ftpmirror

I looked through most of the "official" ways of doing things (including
the mirror script) and ended up writing my own because I didn't like the
way the others were set up. (And because I needed an excuse to brush up
on my Perl. :) I just wanted to mirror unstable, and I wanted to
minimize the space needed. It's not terribly fault-tolerant, but it's
VERY easy to debug. After the initial mirroring is done updates are
usually done within 3 - 4 hours over a DSL line. (768 Kbps) If you can't
get mirror working and want to try it just let me know.

-Alex


signature.asc
Description: This is a digitally signed message part

Re: mirror, the perl script mirroring package

[Walter Tautz]

On Tue, 18 Jun 2002, Paul E Condon wrote:

> I am attempting to setup a local private mirror of debian using the perl 
> script package. It has run for several days. It quits from time to time and
> waits for the next initiation event from crontab, but it can't seem to clear
> its queue of requests to set up softlink into the pool. I've tried pointing it
> to a couple of different debian mirrors and get the same results for both.
> 
> Suggestions, please. A different package? Some trick in setup?

I would suggest using the scripts on the main debian site. Look for info
about how to mirror the site. I prefer using rsync

search the site for 'mirror' or just go to:
http://www.debian.org/mirror/ftpmirror

-walter

ps. You may need to hack this a bit, i.e. include the appropriate --exclude
stuff.



-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

mirror, the perl script mirroring package

[Paul E Condon]

I am attempting to setup a local private mirror of debian using the perl 
script package. It has run for several days. It quits from time to time and
waits for the next initiation event from crontab, but it can't seem to clear
its queue of requests to set up softlink into the pool. I've tried pointing it
to a couple of different debian mirrors and get the same results for both.

Suggestions, please. A different package? Some trick in setup?

TIA


-- 
Paul E Condon   
[EMAIL PROTECTED]


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED] 
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Re: perl script to replace html login?

[Johannes Franken]

On Fri, Feb 08, 2002 at 02:01:30PM +0200, Martin Fluch wrote:
> Is there a easy way to make a perl skript to send an http post request

apt-get install libwww-perl
man 1p POST

-- 
Johannes Franken
 
Professional unix/network development
mailto:[EMAIL PROTECTED]
http://www.jfranken.de/

Re: perl script to replace html login?

[Pietro Cagnoni]

> Hi!
> 
> Is there a easy way to make a perl skript to send an http post request
> produced by the following html form?
> 
> 
> 
> 
> 
> 
> 
> The reply of the server is not important...

install libwww-perl and use LWP::UserAgent .

pietro.

perl script to replace html login?

[Martin Fluch]

Hi!

Is there a easy way to make a perl skript to send an http post request
produced by the following html form?







The reply of the server is not important...

- Martin

Cannot run a perl script | Fail to install php4

[Andreas]

Hi there!

I have just run into a strange problem.
I am installing (or try to ) PHP4 for Apache 1.3.20.
The installation of Apache was as smooth as possible.
But now, when I tryed to configure PHP, I suddently faced the following problem:
apxs wont run!!

file says: /opt/httpd/bin/apxs: perl script text 

the apxs starts with "#!/usr/bin/perl/  "
and ls -lA prompts: "-rwxr-xr-x1 root root21933 Aug  2 21:27 
apxs "

perl is in the path and if I type perl  /opt/httpd/bin/apxs, the proggy runs as 
expected.

the errormessage from ./configure also is no real help:
"checking for Apache module support via DSO through APXS...
./configure: /opt/httpd/bin/: is a directory
Sorry, I was not able to successfully run APXS.  Possible reasons:
1.  Perl is not installed;
2.  Apache was not compiled with DSO support (--enable-module=so);
3.  'apxs' is not in your path. "

/opt/httpd/bin/httpd -l  promts:
"Compiled-in modules:
  http_core.c
mod_so.c
suexec: disabled; invalid wrapper /opt/httpd/bin/suexec" 

(suexec isn't wanted, so it's no problem)



Can somebody help me?


Thanx in advance


Andreas Maresch

Re: Setuid Perl script works on one slink box, doesn't work on the other

[Seth R Arnold]

Is perl-5.004-suid installed on one and not hte other?

On Wed, Sep 22, 1999 at 12:40:34PM +1000, Andrew Pollock wrote:
> Hi,
> 
> We've got two relatively new slink boxes, both running 2.2.12, and I've got
> a setuid Perl script that doesn't work on one, but does on the other.
> Permissions are the same, everything (that I can think of) is the same...
> 
> It's Perl 5.004_04.
> 
> On the box that won't run the script, it barfs:
> 
> Can't do setuid
> 
> As soon as you try to run the script.
> 
> Anyone got any bright ideas?
> 
> Andrew
> 
> 
> Andrew Pollock  Technical Director
> [EMAIL PROTECTED] http://staff.bit.net.au/apollock
> Brisbane Internet Technology Pty Ltd.
> 
> 
> -- 
> Unsubscribe?  mail -s unsubscribe [EMAIL PROTECTED] < /dev/null

-- 
Seth Arnold | http://www.willamette.edu/~sarnold/
Hate spam? See http://maps.vix.com/rbl/ for help
Hi! I'm a .signature virus! Copy me into
your ~/.signature to help me spread!

Setuid Perl script works on one slink box, doesn't work on the other

[Andrew Pollock]

Hi,

We've got two relatively new slink boxes, both running 2.2.12, and I've got
a setuid Perl script that doesn't work on one, but does on the other.
Permissions are the same, everything (that I can think of) is the same...

It's Perl 5.004_04.

On the box that won't run the script, it barfs:

Can't do setuid

As soon as you try to run the script.

Anyone got any bright ideas?

Andrew


Andrew Pollock  Technical Director
[EMAIL PROTECTED] http://staff.bit.net.au/apollock
Brisbane Internet Technology Pty Ltd.

Quake 2 - not a perl script?

[Peter Ludwig]

I've just gotten Quake 2, and the startup script in /usr/games returns the
following error message :-

Not a perl script at /usr/games/quake2 line 1.

Anyone know what's going on here?  I've just upgraded most of my sytsem to
slink, and I waited to install Quake 2 until after I did the upgrade...

I really would like to run the linux version as the Windows version is too
slow on my machine (all those graphics under a GUI with no 3D accelerator
card ).

Regards,
Peter Ludwig

Re: perl script

[Jiri Baum]

Hamish Moffatt:
[about DOS lineends] 
> vim has always hidden these characters, AFAIK. nvi doesn't.

:set ff=unix

Or did I already write that?

It changes the mode for the current file from whatever it was to Unix.


Jiri
-- 
<[EMAIL PROTECTED]>
We'll know the future has arrived when every mailer transparently
quotes lines that begin with "From ", but no-one remembers why.

Re: perl script

[Miquel van Smoorenburg]

In article <[EMAIL PROTECTED]>,
Hamish Moffatt  <[EMAIL PROTECTED]> wrote:
[about CRLF at the end of a line]
>vim has always hidden these characters, AFAIK. nvi doesn't.

vim -b file

:%!col -b

Mike.
-- 
Indifference will certainly be the downfall of mankind, but who cares?

Re: perl script

[Hamish Moffatt]

On Thu, Jul 17, 1997 at 11:43:58AM -0700, Mike Schmitz wrote:
> mike:~$ invoice -n
> Illegal character \015 (carriage return) at /home/mschmitz/bin/invoice line 3.
> (Maybe you didn't strip carriage returns after a network transfer?)   
>  
> 
> -- Snip --
> 
> The only transfers this script has gotten have been accomplished by cp. If
> I put a # at the end of line 3, the error just moves up one.  Has anyone 
> seen/solved this error?

You can strip them out with:

dos2unix filename

or 

mv filename filename.orig; tr -d '\015' < filename.orig > filename

or a bunch of other methods.

vim has always hidden these characters, AFAIK. nvi doesn't.

Hamish
-- 
Hamish Moffatt VK3TYD  [EMAIL PROTECTED], [EMAIL PROTECTED]
Latest Debian packages at ftp://ftp.rising.com.au/pub/hamish. PGP#EFA6B9D5
CCs of replies from mailing lists are welcome.   http://hamish.home.ml.org

Re: perl script

[Jiri Baum]

Mike Schmitz:
> I don't have pico, and usually use only vim. Vim showed no ^M's so I was 
> fairly satisfied that they did not exist.
...
> Is vim now trying to be compatible with M$?!!

Yeah, vim is trying to be too clever.

:set ff=unix
or
:set fileformat=unix

For more info, :help fileformat


Jiri
-- 
<[EMAIL PROTECTED]>
We'll know the future has arrived when every mailer transparently
quotes lines that begin with "From ", but no-one remembers why.

perl script

[Mike Schmitz]

I upgraded my system to hamm recently, and I am having trouble with a script
I have been using to create invoices. The error message is:

-- Snip --

mike:~$ invoice -n
Illegal character \015 (carriage return) at /home/mschmitz/bin/invoice line 3.
(Maybe you didn't strip carriage returns after a network transfer?)

-- Snip --

The only transfers this script has gotten have been accomplished by cp. If
I put a # at the end of line 3, the error just moves up one.  Has anyone 
seen/solved this error?

-- 
  Mike Schmitz [EMAIL PROTECTED]http://www.bend-or.com/~mschmitz   
  Don't blame me - I voted libertarian!http://www.lp.org/ 
  Use Debian Linux - the free Gnu/Linuxhttp://www.debian.org/ 

Re: perl script

[Mike Schmitz]

On Jul 17, Ben Gertzfield wrote
> > "Mike" == Mike Schmitz <[EMAIL PROTECTED]> writes:
> 
> Mike> I upgraded my system to hamm recently, and I am having
> Mike> trouble with a script I have been using to create
> Mike> invoices. The error message is:
> 
> Mike> -- Snip --
> 
> Mike> mike:~$ invoice -n Illegal character \015 (carriage return)
> Mike> at /home/mschmitz/bin/invoice line 3.  (Maybe you didn't
> Mike> strip carriage returns after a network transfer?)
> 
> Mike> -- Snip --
> 
> Mike> The only transfers this script has gotten have been
> Mike> accomplished by cp. If I put a # at the end of line 3, the
> Mike> error just moves up one.  Has anyone seen/solved this error?
> 
> Perl 5.004 does not allow DOS carriage returns at the end of line.
> You will have to go through and remove all the ^Ms from the script.
> 
> (an easy way to do that would be to 'pico filename', then just save)
> 
I don't have pico, and usually use only vim. Vim showed no ^M's so I was 
fairly satisfied that they did not exist. I started looking at the file
in other editors on my system, ae & xedit, ae showed none, but xedit saw
them big as life. Is vim now trying to be compatible with M$?!! I may
have to find a new editor.

-- 
-
  Mike Schmitz [EMAIL PROTECTED]http://www.bend-or.com/~mschmitz   
  Don't blame me - I voted libertarian!http://www.lp.org/ 
  Use Debian Linux - the free Gnu/Linuxhttp://www.debian.org/ 
-

Re: looking for dns perl script

[Scott Ellis]

On Wed, 28 Jan 1998, eugene mendoza wrote:

> 
> Hello,
> I am looking for perl script to convert bind ver 4 
> files to bind ver 8 files.
> The file is named-bootconf.pl.
> It is not on the linux cd.
> If anyone can send me this by mail, will be deeply
> appreciated.
> Best Regards,
> Eugene

The Debian bind_8* package has named-bootconf.pl included in it.

-- 
Scott K. Ellis <[EMAIL PROTECTED]> http://www.gate.net/~storm/


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

looking for dns perl script

[eugene mendoza]

Hello,
I am looking for perl script to convert bind ver 4 
files to bind ver 8 files.
The file is named-bootconf.pl.
It is not on the linux cd.
If anyone can send me this by mail, will be deeply
appreciated.
Best Regards,
Eugene




_
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

Re: WC:>: [linux-security] Perl script to locate F0 0F C7 C8 bombs (fwd)

[ychim]

It is not the only opcode that can crash a Pentium (MMX) computer, so
not really fix it.

Chad D. Zimmerman wrote:
> 
> Here is a script that I got from another list I am on.  May be of use to
> some peple here.
> 
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
> Chad D. Zimmerman   [EMAIL PROTECTED]
> Southwest Technology Development Institute
> New Mexico State University
> ---
> HP: http://dabcc-www.nmsu.edu/~chad/
> DBP: http://dabcc-www.nmsu.edu/~chad/Debian/
> SWAO: http://desertwinds.multipleimage.com/
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
> 
> -- Forwarded message --
> Date: Mon, 10 Nov 1997 11:41:17 + (MYT)
> To: linuxsa <[EMAIL PROTECTED]>
> Subject: [linux-security] Perl script to locate F0 0F C7 C8 bombs (fwd)
> 
> 
> There is no known fix to the F0 0F C7 C8 bug at this time.  What can be
> done, however, is run a program, such as the script after my signature, to
> locate any and all such programs.  This script can be used in single
> user mode after a mysterious lockup on a multiuser Pentium system.
> 
> I hope it is possible to come up with a software fix for this problem.
> 
> - Sam
> 
> "You can...turn sadness into laughter" -- Sunscreem, _Love_U_More_
> 
> #!/usr/bin/perl
> 
> # There is no known software fix to the F0 0F C7 C8 bug at this time
> 
> # usage: finddeath dir
> 
> # where dir is the directory you recursively look at all programs in
> # for instances of the F0 0F C7 C8 sequence
> 
> # This script will search for programs with this sequence, which will
> # help sysadmins take appropriate action against those running such
> # programs
> 
> # This script is written (but has not been tested) in Perl4, to
> # insure maximum compatibility
> 
> sub findit {
> 
>   local($dir,$file,@files,$data) = @_;
> 
>   undef $/;
> 
>   if(!opendir(DIR,$dir)) {
> print STDERR "Can not open $dir: $!\n";
> return 0;
> }
> 
>   @files=readdir(DIR);
> 
>   foreach $file (@files) {
> if($file ne '.' && $file ne '..') {
>   if( -f "$dir/$file" && open(FILE,"< $dir/$file")) {
> $data=;
> if($data =~ /\xf0\x0f\xc7\xc8/) {
>   print "$dir/$file contains F0 0F C7 C8\n";
>   }
> } elsif( -d "$dir/$file") {
>   &findit("$dir/$file");
> }
>   }
> }
> 
>   }
> 
> $dir = shift || '/home';
> 
> &findit($dir);
> 
> 
> --
> --
> Please refere to the information about this list as well as general
> information about Linux security at http://www.aoy.com/Linux/Security.
> --
> 
> --
> Check out the LinuxSA web pages at http://www.linuxsa.org.au/
> To unsubscribe from the LinuxSA list:
>   mail [EMAIL PROTECTED] with "unsubscribe" as the subject
> 
> 
> 
>  Join The Web Consultants Association :  Register on our web site Now
> Web Consultants Web Site : http://just4u.com/webconsultants
> If you lose the instructions All subscription/unsubscribing can be done
> directly from our website for all our lists.
> -
> 
> --
> TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
> [EMAIL PROTECTED] .
> Trouble?  e-mail to [EMAIL PROTECTED] .


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

WC:>: [linux-security] Perl script to locate F0 0F C7 C8 bombs (fwd)

[Chad D. Zimmerman]

Here is a script that I got from another list I am on.  May be of use to
some peple here.

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Chad D. Zimmerman   [EMAIL PROTECTED]
Southwest Technology Development Institute
New Mexico State University
---
HP: http://dabcc-www.nmsu.edu/~chad/
DBP: http://dabcc-www.nmsu.edu/~chad/Debian/
SWAO: http://desertwinds.multipleimage.com/
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

-- Forwarded message --
Date: Mon, 10 Nov 1997 11:41:17 + (MYT)
To: linuxsa <[EMAIL PROTECTED]>
Subject: [linux-security] Perl script to locate F0 0F C7 C8 bombs (fwd)


There is no known fix to the F0 0F C7 C8 bug at this time.  What can be
done, however, is run a program, such as the script after my signature, to
locate any and all such programs.  This script can be used in single
user mode after a mysterious lockup on a multiuser Pentium system.

I hope it is possible to come up with a software fix for this problem.

- Sam

"You can...turn sadness into laughter" -- Sunscreem, _Love_U_More_

#!/usr/bin/perl 

# There is no known software fix to the F0 0F C7 C8 bug at this time

# usage: finddeath dir

# where dir is the directory you recursively look at all programs in
# for instances of the F0 0F C7 C8 sequence

# This script will search for programs with this sequence, which will
# help sysadmins take appropriate action against those running such
# programs

# This script is written (but has not been tested) in Perl4, to
# insure maximum compatibility 

sub findit {

  local($dir,$file,@files,$data) = @_;

  undef $/;

  if(!opendir(DIR,$dir)) {
print STDERR "Can not open $dir: $!\n";
return 0;
}

  @files=readdir(DIR);

  foreach $file (@files) {
if($file ne '.' && $file ne '..') {
  if( -f "$dir/$file" && open(FILE,"< $dir/$file")) {
$data=;
if($data =~ /\xf0\x0f\xc7\xc8/) {
  print "$dir/$file contains F0 0F C7 C8\n";
  }
} elsif( -d "$dir/$file") {
  &findit("$dir/$file");
}
  }
}

  }

$dir = shift || '/home';

&findit($dir);


-- 
--
Please refere to the information about this list as well as general
information about Linux security at http://www.aoy.com/Linux/Security.
--



-- 
Check out the LinuxSA web pages at http://www.linuxsa.org.au/
To unsubscribe from the LinuxSA list:
  mail [EMAIL PROTECTED] with "unsubscribe" as the subject



 Join The Web Consultants Association :  Register on our web site Now
Web Consultants Web Site : http://just4u.com/webconsultants
If you lose the instructions All subscription/unsubscribing can be done
directly from our website for all our lists.
-


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

Re: perl script

[Ronald van Loon]

In a message to me, Hamish Moffatt, you wrote:

|"On Thu, Jul 17, 1997 at 10:40:45PM -0700, Mike Schmitz wrote:
|"> I don't have pico, and usually use only vim. Vim showed no ^M's so I was 
|"> fairly satisfied that they did not exist. I started looking at the file
|"> in other editors on my system, ae & xedit, ae showed none, but xedit saw
|"> them big as life. Is vim now trying to be compatible with M$?!! I may
|"> have to find a new editor.
|"
|"Vim will ignore them, but leave them in when it saves.

True, but you can `:set notextmode' to remove them. The philosophy is to
leave the textfiles as they were, as much as possible.

>>> Ronald van Loon ([EMAIL PROTECTED])   
>>> <<<
I hold your hand in mine, dear / I press it to my lips. I take a 
healthy bite from your dainty fingertips. My joy would be complete, dear, 
if you were only here, But still I keep your hand as a precious souvenir.


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

Re: perl script

[Hamish Moffatt]

On Thu, Jul 17, 1997 at 10:40:45PM -0700, Mike Schmitz wrote:
> I don't have pico, and usually use only vim. Vim showed no ^M's so I was 
> fairly satisfied that they did not exist. I started looking at the file
> in other editors on my system, ae & xedit, ae showed none, but xedit saw
> them big as life. Is vim now trying to be compatible with M$?!! I may
> have to find a new editor.

Vim will ignore them, but leave them in when it saves.
Vi will show them. Can be removed with

tr -d '\015' < file > file2







Hamish
-- 
Hamish Moffatt, StudIEAust[EMAIL PROTECTED]
Student, computer science & computer systems engineering.3rd year, RMIT.
http://hamish.home.ml.org/ (PGP key here) CPOM: [* ] 50%
The opposite of a profound truth may well be another profound truth.  --Bohr


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

Re: perl script

[Mike Schmitz]

On Jul 17, Ben Gertzfield wrote
> > "Mike" == Mike Schmitz <[EMAIL PROTECTED]> writes:
> 
> Mike> I upgraded my system to hamm recently, and I am having
> Mike> trouble with a script I have been using to create
> Mike> invoices. The error message is:
> 
> Mike> -- Snip --
> 
> Mike> mike:~$ invoice -n Illegal character \015 (carriage return)
> Mike> at /home/mschmitz/bin/invoice line 3.  (Maybe you didn't
> Mike> strip carriage returns after a network transfer?)
> 
> Mike> -- Snip --
> 
> Mike> The only transfers this script has gotten have been
> Mike> accomplished by cp. If I put a # at the end of line 3, the
> Mike> error just moves up one.  Has anyone seen/solved this error?
> 
> Perl 5.004 does not allow DOS carriage returns at the end of line.
> You will have to go through and remove all the ^Ms from the script.
> 
> (an easy way to do that would be to 'pico filename', then just save)
> 
I don't have pico, and usually use only vim. Vim showed no ^M's so I was 
fairly satisfied that they did not exist. I started looking at the file
in other editors on my system, ae & xedit, ae showed none, but xedit saw
them big as life. Is vim now trying to be compatible with M$?!! I may
have to find a new editor.

-- 
-
  Mike Schmitz [EMAIL PROTECTED]http://www.bend-or.com/~mschmitz   
  Don't blame me - I voted libertarian!http://www.lp.org/ 
  Use Debian Linux - the free Gnu/Linuxhttp://www.debian.org/ 
-


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

Re: perl script

[Ben Gertzfield]

> "Mike" == Mike Schmitz <[EMAIL PROTECTED]> writes:

Mike> I upgraded my system to hamm recently, and I am having
Mike> trouble with a script I have been using to create
Mike> invoices. The error message is:

Mike> -- Snip --

Mike> mike:~$ invoice -n Illegal character \015 (carriage return)
Mike> at /home/mschmitz/bin/invoice line 3.  (Maybe you didn't
Mike> strip carriage returns after a network transfer?)

Mike> -- Snip --

Mike> The only transfers this script has gotten have been
Mike> accomplished by cp. If I put a # at the end of line 3, the
Mike> error just moves up one.  Has anyone seen/solved this error?

Perl 5.004 does not allow DOS carriage returns at the end of line.
You will have to go through and remove all the ^Ms from the script.

(an easy way to do that would be to 'pico filename', then just save)

-- 
Brought to you by the letters K and X and the number 15.
"Disobeying me?" "No, I don't." -- Final Fantasy II
Ben Gertzfield  Finger me for my public
PGP key. I'm on FurryMUCK as Che, and EFNet and YiffNet IRC as Che_Fox.


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .

perl script

[Mike Schmitz]

I upgraded my system to hamm recently, and I am having trouble with a script
I have been using to create invoices. The error message is:

-- Snip --

mike:~$ invoice -n
Illegal character \015 (carriage return) at /home/mschmitz/bin/invoice line 3.
(Maybe you didn't strip carriage returns after a network transfer?)

-- Snip --

The only transfers this script has gotten have been accomplished by cp. If
I put a # at the end of line 3, the error just moves up one.  Has anyone 
seen/solved this error?

-- 
  Mike Schmitz [EMAIL PROTECTED]http://www.bend-or.com/~mschmitz   
  Don't blame me - I voted libertarian!http://www.lp.org/ 
  Use Debian Linux - the free Gnu/Linuxhttp://www.debian.org/ 


--
TO UNSUBSCRIBE FROM THIS MAILING LIST: e-mail the word "unsubscribe" to
[EMAIL PROTECTED] . 
Trouble?  e-mail to [EMAIL PROTECTED] .