win32::taskscheduler
by Strasser, Volker other posts by this author
Jul 21 2004 5:59AM messages near this date
view in the new Beta List Site
scripting login to remote ssh server.
|
RE: Ignore rogue EOF
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
------_=_NextPart_001_01C46EE7.E4C960C0
Content-Type: text/plain;
charset="iso-8859-1"
hi,
I am trying to go some servers to check if there is scheduled task. so with
win32::taskscheduler I can get the first server and
all the information, but when I loop to the next server I cannot
"settargetcomputer" it always dies with an errorcode 1.
does anyone no this thing. could it be that an object is still open? how to
close? how to debug?
so long
volker strasser
-----Original Message-----
From: perl-win32-admin-request@[...].com
[mailto:perl-win32-admin-request@[...].com]
Sent: Dienstag, 20. Juli 2004 19:41
To: perl-win32-admin@[...].com
Subject: Perl-Win32-Admin Digest, Vol 6, Issue 15
Send Perl-Win32-Admin mailing list submissions to
perl-win32-admin@[...].com
To subscribe or unsubscribe via the World Wide Web, visit
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
or, via email, send a message with subject or body 'help' to
perl-win32-admin-request@[...].com
You can reach the person managing the list at
perl-win32-admin-owner@[...].com
When replying, please edit your Subject line so it is more specific than
"Re: Contents of Perl-Win32-Admin digest..."
Today's Topics:
1. Win32::FileSecurity problem (Ruud Feringa)
2. RE: Win32::FileSecurity problem (Tim Johnson)
3. Ignore rogue EOF (Conor Lillis)
4. RE: Ignore rogue EOF (Dutrieux Yves)
5. Re: Ignore rogue EOF (colin_e)
6. RE: Ignore rogue EOF (Conor Lillis)
----------------------------------------------------------------------
Message: 1
Date: Mon, 19 Jul 2004 21:43:07 +0200
From: "Ruud Feringa" <rferinga007@[...].com>
Subject: Win32::FileSecurity problem
To: perl-win32-admin@[...].com
Message-ID: <Sea1-F30sHmq9PXKmr300009f34@[...].com>
Content-Type: text/plain; charset=iso-8859-1; format=flowed
Hi,
I have a problem with setting acls with Win32::FileSecurity::Set($filename,
\%perm )
When the username in the permision hash is preceded with the domain name I
get the following error:
<domain> \<username>
Error handling errror: 1722, LookupAccountName at c:\perl\eg\acl.pl line 45
When I use the username only (so without <domain> \ ) I do not get this
error, but because we are migrating to another domain that's not what I
want. By the way, the 'get' sub gives the account names WITH the domain
part! What is going wrong?
any tips are welcome!
-Ruud
_________________________________________________________________
_________________________________________________________________
Ook een gouden buddy worden in Messenger? Go for gold!
http://mobile.msn.com/?lc=nl-nl
------------------------------
Message: 2
Date: Mon, 19 Jul 2004 12:51:21 -0700
From: "Tim Johnson" <tjohnson@[...].com>
Subject: RE: Win32::FileSecurity problem
To: "Ruud Feringa" <rferinga007@[...].com> ,
<perl-win32-admin@[...].com>
Message-ID:
<78E0B682C9508740B37610A9342E9DCD06A81CEA@[...].local>
Content-Type: text/plain; charset="us-ascii"
Is there any chance that you need to be using two backslashes instead of
one? (It's such a common problem, I just have to ask)
-----Original Message-----
From: perl-win32-admin-bounces@[...].com
[mailto:perl-win32-admin-bounces@[...].com] On Behalf Of Ruud
Feringa
Sent: Monday, July 19, 2004 12:43 PM
To: perl-win32-admin@[...].com
Subject: Win32::FileSecurity problem
Hi,
I have a problem with setting acls with
Win32::FileSecurity::Set($filename,
\%perm )
When the username in the permision hash is preceded with the domain name I
get the following error:
<domain> \<username>
Error handling errror: 1722, LookupAccountName at c:\perl\eg\acl.pl line
45
When I use the username only (so without <domain> \ ) I do not get this
error, but because we are migrating to another domain that's not what I
want. By the way, the 'get' sub gives the account names WITH the domain
part! What is going wrong?
any tips are welcome!
-Ruud
_________________________________________________________________
_________________________________________________________________
Ook een gouden buddy worden in Messenger? Go for gold!
http://mobile.msn.com/?lc=nl-nl
_______________________________________________
Perl-Win32-Admin mailing list
Perl-Win32-Admin@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
------------------------------
Message: 3
Date: Tue, 20 Jul 2004 12:46:05 +0100
From: Conor Lillis <Conor@[...].ie>
Subject: Ignore rogue EOF
To: "Perl-Win32-Admin (E-mail)"
<perl-win32-admin@[...].com>
Message-ID:
<9BF54580E7ADD711BBAB00902793685104877957@[...].ie>
Content-Type: text/plain; charset="iso-8859-1"
Hi, I havge a script qwhich analyses our Mailsweeper logs for traffic
statistic purposes. Unfortunately some spam mailers have started putting EOF
chars (hex 1A) into the subject line, causing my script to only partially
load the log file when reading the file in. Is there a way to overcome this
?
Here is the read statement that is failing, I can provide a snippet of the
logfile as an attachment to anyone who is interested..
my $logfile= 'v:\\logfile\\20040715.log'; if (-e $logfile){open
(LOG,"$logfile") || die $!;} @array = (<LOG> ); close(LOG); print "There are
" .@array <mailto:.@array> ." lines in the file $logfile\n"; print "Last
line ".(@array-1)." is $array[@array-1]\n"; exit;
The information in this e-mail is confidential and may be legally
privileged. It is intended solely for the addressee. Access to this e-mail
by anyone else is unauthorised. If you are not the intended recipient, any
disclosure, copying, distribution or any other action taken or any views,
opinions or advice contained in this e-mail are those of the sending
individual and not necessarily those of the firm. It is possible for data
transmitted by e-mail to be deliberately or accidentally corrupted or
intercepted. For this reason where the communication is by e-mail, J&E Davy
does not accept any responsibility for any breach of confidence which may
arise from the use of this medium. If you have received this e-mail in error
please notify us immediately at mailto:helpdesk@[...].ie and delete this
e-mail from your system.
-------------- next part --------------
An HTML attachment was scrubbed...
URL:
http://ASPN.ActiveState.com/ASPN/Mail/Browse/Threaded/perl-win32-admin/attac
hments/20040720/75b2d837/attachment-0001.htm
------------------------------
Message: 4
Date: Tue, 20 Jul 2004 14:44:52 +0200
From: "Dutrieux Yves" <YDU@[...].be>
Subject: RE: Ignore rogue EOF
To: "Conor Lillis" <Conor@[...].ie> , "Perl-Win32-Admin \(E-mail\)"
<perl-win32-admin@[...].com>
Message-ID: <04Jul20.144009cest.334081@[...].be>
Content-Type: text/plain; charset="iso-8859-1"
Try to read the log in binary mode.
open LOG, "<:raw","$logfile" or die $! ;
Yves
________________________________
De : perl-win32-admin-bounces@[...].com
[mailto:perl-win32-admin-bounces@[...].com] De la part de
Conor Lillis Envoyé : mardi 20 juillet 2004 13:46 À : Perl-Win32-Admin
(E-mail) Objet : Ignore rogue EOF
Hi, I havge a script qwhich analyses our Mailsweeper logs for traffic
statistic purposes. Unfortunately some spam mailers have started putting EOF
chars (hex 1A) into the subject line, causing my script to only partially
load the log file when reading the file in. Is there a way to overcome this
?
Here is the read statement that is failing, I can provide a snippet of the
logfile as an attachment to anyone who is interested..
my $logfile= 'v:\\logfile\\20040715.log'; if (-e $logfile){open
(LOG,"$logfile") || die $!;} @array = (<LOG> ); close(LOG); print "There are
".@array." lines in the file $logfile\n"; print "Last line ".(@array-1)." is
$array[@array-1]\n"; exit;
The information in this e-mail is confidential and may be legally
privileged. It is intended solely for the addressee. Access to this e-mail
by anyone else is unauthorised. If you are not the intended recipient, any
disclosure, copying, distribution or any other action taken or any views,
opinions or advice contained in this e-mail are those of the sending
individual and not necessarily those of the firm. It is possible for data
transmitted by e-mail to be deliberately or accidentally corrupted or
intercepted. For this reason where the communication is by e-mail, J&E Davy
does not accept any responsibility for any breach of confidence which may
arise from the use of this medium. If you have received this e-mail in error
please notify us immediately at mailto:helpdesk@[...].ie and delete this
e-mail from your system.
-------------- next part --------------
An HTML attachment was scrubbed...
URL:
http://ASPN.ActiveState.com/ASPN/Mail/Browse/Threaded/perl-win32-admin/attac
hments/20040720/2b854263/attachment-0001.htm
------------------------------
Message: 5
Date: Tue, 20 Jul 2004 14:06:43 +0100
From: colin_e <colin_e@[...].com>
Subject: Re: Ignore rogue EOF
To: Conor Lillis <Conor@[...].ie>
Cc: "Perl-Win32-Admin \(E-mail\)"
<perl-win32-admin@[...].com>
Message-ID: <40FD18E3.6060502@[...].com>
Content-Type: text/plain; charset="us-ascii"
As you are running on Windows you may need to use binmode() on your log file
to make the read ignore the EOF character.
Regards: Colin
Conor Lillis wrote:
> Hi, I havge a script qwhich analyses our Mailsweeper logs for traffic
> statistic purposes. Unfortunately some spam mailers have started
> putting EOF chars (hex 1A) into the subject line, causing my script to
> only partially load the log file when reading the file in. Is there a
> way to overcome this ?
>
> Here is the read statement that is failing, I can provide a snippet of
> the logfile as an attachment to anyone who is interested..
>
> my $logfile= 'v:\\logfile\\20040715.log'; if (-e $logfile){open
> (LOG,"$logfile") || die $!;} @array = (<LOG>); close(LOG); print
> "There are ".@array <mailto:.@array>." lines in the file $logfile\n";
> print "Last line ".(@array-1)." is $array[@array-1]\n"; exit;
>
>
> The information in this e-mail is confidential and may be legally
> privileged. It is intended solely for the addressee. Access to this
> e-mail by anyone else is unauthorised. If you are not the intended
> recipient, any disclosure, copying, distribution or any other action
> taken or any views, opinions or advice contained in this e-mail are
> those of the sending individual and not necessarily those of the firm.
> It is possible for data transmitted by e-mail to be deliberately or
> accidentally corrupted or intercepted. For this reason where the
> communication is by e-mail, J&E Davy does not accept any
> responsibility for any breach of confidence which may arise from the
> use of this medium. If you have received this e-mail in error please
> notify us immediately at mailto:helpdesk@[...].ie and delete this
> e-mail from your system.
>
> -----------------------------------------------------------------------
> -
>
> _______________________________________________
> Perl-Win32-Admin mailing list
> Perl-Win32-Admin@[...].com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL:
http://ASPN.ActiveState.com/ASPN/Mail/Browse/Threaded/perl-win32-admin/attac
hments/20040720/1bc1099d/attachment-0001.htm
------------------------------
Message: 6
Date: Tue, 20 Jul 2004 18:40:23 +0100
From: Conor Lillis <Conor@[...].ie>
Subject: RE: Ignore rogue EOF
To: Conor Lillis <Conor@[...].ie> , "Perl-Win32-Admin (E-mail)"
<perl-win32-admin@[...].com>
Message-ID:
<9BF54580E7ADD711BBAB00902793685104877961@[...].ie>
Content-Type: text/plain; charset="iso-8859-1"
I overcame the issue by inserting the following line
use open IN => ":raw";
many thanks to colin_e and Dutrieux Yves for steering me in the right
direction !
-----Original Message-----
From: Conor Lillis [mailto:Conor@[...].ie]
Sent: 20 July 2004 12:46
To: Perl-Win32-Admin (E-mail)
Subject: Ignore rogue EOF
Hi, I havge a script qwhich analyses our Mailsweeper logs for traffic
statistic purposes. Unfortunately some spam mailers have started putting EOF
chars (hex 1A) into the subject line, causing my script to only partially
load the log file when reading the file in. Is there a way to overcome this
?
Here is the read statement that is failing, I can provide a snippet of the
logfile as an attachment to anyone who is interested..
my $logfile= 'v:\\logfile\\20040715.log'; if (-e $logfile){open
(LOG,"$logfile") || die $!;} @array = (<LOG> ); close(LOG); print "There are
" .@array <mailto:.@array> ." lines in the file $logfile\n"; print "Last
line ".(@array-1)." is $array[@array-1]\n"; exit;
The information in this e-mail is confidential and may be legally
privileged. It is intended solely for the addressee. Access to this e-mail
by anyone else is unauthorised. If you are not the intended recipient, any
disclosure, copying, distribution or any other action taken or any views,
opinions or advice contained in this e-mail are those of the sending
individual and not necessarily those of the firm. It is possible for data
transmitted by e-mail to be deliberately or accidentally corrupted or
intercepted. For this reason where the communication is by e-mail, J&E Davy
does not accept any responsibility for any breach of confidence which may
arise from the use of this medium. If you have received this e-mail in error
please notify us immediately at mailto:helpdesk@[...].ie and delete this
e-mail from your system.
The information in this e-mail is confidential and may be legally
privileged. It is intended solely for the addressee. Access to this e-mail
by anyone else is unauthorised. If you are not the intended recipient, any
disclosure, copying, distribution or any other action taken or any views,
opinions or advice contained in this e-mail are those of the sending
individual and not necessarily those of the firm. It is possible for data
transmitted by e-mail to be deliberately or accidentally corrupted or
intercepted. For this reason where the communication is by e-mail, J&E Davy
does not accept any responsibility for any breach of confidence which may
arise from the use of this medium. If you have received this e-mail in error
please notify us immediately at mailto:helpdesk@[...].ie and delete this
e-mail from your system.
-------------- next part --------------
An HTML attachment was scrubbed...
URL:
http://ASPN.ActiveState.com/ASPN/Mail/Browse/Threaded/perl-win32-admin/attac
hments/20040720/a289f492/attachment.htm
------------------------------
_______________________________________________
Perl-Win32-Admin mailing list
Perl-Win32-Admin@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
End of Perl-Win32-Admin Digest, Vol 6, Issue 15
***********************************************
*** Diese Mail wurde nach gefährlichen Inhalten gescannt ***
*** WICHTIG: Bitte Vorsicht beim Öffnen von Mailanhängen von unbekannten
oder verdächtigen Absendern ***
*** eSafe scanned this email for malicious content ***
*** IMPORTANT: Do not open attachments from unrecognized senders ***
All for One Systemhaus AG, Abteilung Professional Services
------_=_NextPart_001_01C46EE7.E4C960C0
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; charset=3Diso-885=
9-1">
<META NAME=3D"Generator" CONTENT=3D"MS Exchange Server version 5.5.2653.1=
2">
<TITLE> win32::taskscheduler</TITLE>
</HEAD>
<BODY>
<P> <FONT SIZE=3D2>hi,</FONT>
</P>
<P> <FONT SIZE=3D2>I am trying to go some servers to check if there is sch=
eduled task. so with win32::taskscheduler I can get the first server and =
</FONT> </P>
<P> <FONT SIZE=3D2>all the information, but when I loop to the next server=
I cannot "settargetcomputer" it always dies with an errorcode =
1.</FONT> </P>
<P> <FONT SIZE=3D2>does anyone no this thing. could it be that an object i=
s still open? how to close? how to debug? </FONT>
</P>
<P> <FONT SIZE=3D2>so long</FONT>
<BR> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>volker strasser</FONT>
</P>
<P> <FONT SIZE=3D2>-----Original Message-----</FONT>
<BR> <FONT SIZE=3D2>From: perl-win32-admin-request@listserv.ActiveState.co=
m [<A HREF=3D"mailto:perl-win32-admin-request@listserv.ActiveState.com"> m=
ailto:perl-win32-admin-request@[...].com</A> ] </FONT>
<BR> <FONT SIZE=3D2>Sent: Dienstag, 20. Juli 2004 19:41</FONT>
<BR> <FONT SIZE=3D2>To: perl-win32-admin@[...].com</FONT>
<BR> <FONT SIZE=3D2>Subject: Perl-Win32-Admin Digest, Vol 6, Issue 15</FON=
T>
</P>
<P> <FONT SIZE=3D2>Send Perl-Win32-Admin mailing list submissions to</FONT=
>
<BR> <FONT SIZE=3D2>perl-win32-=
admin@[...].com</FONT>
</P>
<P> <FONT SIZE=3D2>To subscribe or unsubscribe via the World Wide Web, vis=
it</FONT>
<BR> <FONT SIZE=3D2><A HREF=3D"=
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin" TARGET=
=3D"_blank"> http://listserv.ActiveState.com/mailman/listinfo/perl-win32-a=
dmin</A> </FONT>
<BR> <FONT SIZE=3D2>or, via email, send a message with subject or body 'he=
lp' to</FONT>
<BR> <FONT SIZE=3D2>perl-win32-=
admin-request@[...].com</FONT>
</P>
<P> <FONT SIZE=3D2>You can reach the person managing the list at</FONT>
<BR> <FONT SIZE=3D2>perl-win32-=
admin-owner@[...].com</FONT>
</P>
<P> <FONT SIZE=3D2>When replying, please edit your Subject line so it is m=
ore specific than "Re: Contents of Perl-Win32-Admin digest..."<=
/FONT>
</P>
<BR>
<P> <FONT SIZE=3D2>Today's Topics:</FONT>
</P>
<P> <FONT SIZE=3D2> 1. Win32::FileSecurity problem (Ruud Ferin=
ga)</FONT>
<BR> <FONT SIZE=3D2> 2. RE: Win32::FileSecurity problem (Tim J=
ohnson)</FONT>
<BR> <FONT SIZE=3D2> 3. Ignore rogue EOF (Conor Lillis)</FONT>
<BR> <FONT SIZE=3D2> 4. RE: Ignore rogue EOF (Dutrieux Yves)</=
FONT>
<BR> <FONT SIZE=3D2> 5. Re: Ignore rogue EOF (colin_e)</FONT>
<BR> <FONT SIZE=3D2> 6. RE: Ignore rogue EOF (Conor Lillis)</F=
ONT>
</P>
<BR>
<P> <FONT SIZE=3D2>-------------------------------------------------------=
---------------</FONT>
</P>
<P> <FONT SIZE=3D2>Message: 1</FONT>
<BR> <FONT SIZE=3D2>Date: Mon, 19 Jul 2004 21:43:07 +0200</FONT>
<BR> <FONT SIZE=3D2>From: "Ruud Feringa" <rferinga007@hotmail=
=2Ecom></FONT>
<BR> <FONT SIZE=3D2>Subject: Win32::FileSecurity problem</FONT>
<BR> <FONT SIZE=3D2>To: perl-win32-admin@[...].com</FONT>
<BR> <FONT SIZE=3D2>Message-ID: <Sea1-F30sHmq9PXKmr300009f34@hotmail.co=
m></FONT>
<BR> <FONT SIZE=3D2>Content-Type: text/plain; charset=3Diso-8859-1; format=
=3Dflowed</FONT>
</P>
<P> <FONT SIZE=3D2>Hi,</FONT>
</P>
<P> <FONT SIZE=3D2>I have a problem with setting acls with Win32::FileSecu=
rity::Set($filename,</FONT>
<BR> <FONT SIZE=3D2>\%perm )</FONT>
</P>
<P> <FONT SIZE=3D2>When the username in the permision hash is preceded wit=
h the domain name I get the following error:</FONT>
</P>
<P> <FONT SIZE=3D2><domain>\<username></FONT>
<BR> <FONT SIZE=3D2>Error handling errror: 1722, LookupAccountName at c:\p=
erl\eg\acl.pl line 45</FONT>
</P>
<P> <FONT SIZE=3D2>When I use the username only (so without <domain>=
\ ) I do not get this error, but because we are migrating to another doma=
in that's not what I want. By the way, the 'get' sub gives the account na=
mes WITH the domain part! What is going wrong?</FONT> </P>
<P> <FONT SIZE=3D2>any tips are welcome!</FONT>
</P>
<P> <FONT SIZE=3D2>-Ruud</FONT>
</P>
<P> <FONT SIZE=3D2>_______________________________________________________=
__________</FONT>
</P>
<P> <FONT SIZE=3D2>_______________________________________________________=
__________</FONT>
<BR> <FONT SIZE=3D2>Ook een gouden buddy worden in Messenger? Go for gold!=
</FONT>
<BR> <FONT SIZE=3D2><A HREF=3D"http://mobile.msn.com/?lc=3Dnl-nl" TARGET=3D=
"_blank"> http://mobile.msn.com/?lc=3Dnl-nl</A></FONT>
</P>
<BR>
<BR>
<P> <FONT SIZE=3D2>------------------------------</FONT>
</P>
<P> <FONT SIZE=3D2>Message: 2</FONT>
<BR> <FONT SIZE=3D2>Date: Mon, 19 Jul 2004 12:51:21 -0700</FONT>
<BR> <FONT SIZE=3D2>From: "Tim Johnson" <tjohnson@sandisk.com=
></FONT>
<BR> <FONT SIZE=3D2>Subject: RE: Win32::FileSecurity problem</FONT>
<BR> <FONT SIZE=3D2>To: "Ruud Feringa" <rferinga007@hotmail.c=
om>,</FONT>
<BR> <FONT SIZE=3D2><perl-wi=
n32-admin@listserv.ActiveState.com></FONT>
<BR> <FONT SIZE=3D2>Message-ID:</FONT>
<BR> <FONT SIZE=3D2><78E0B68=
2C9508740B37610A9342E9DCD06A81CEA@hqex1.sandisk.local></FONT>
<BR> <FONT SIZE=3D2>Content-Type: text/plain;  =
; charset=3D"us-ascii"</FONT>
</P>
<P> <FONT SIZE=3D2>Is there any chance that you need to be using two backs=
lashes instead of one? (It's such a common problem, I just have to ask)</=
FONT> </P>
<P> <FONT SIZE=3D2>-----Original Message-----</FONT>
<BR> <FONT SIZE=3D2>From: perl-win32-admin-bounces@listserv.ActiveState.co=
m</FONT>
<BR> <FONT SIZE=3D2>[<A HREF=3D"mailto:perl-win32-admin-bounces@listserv.A=
ctiveState.com"> mailto:perl-win32-admin-bounces@[...].com<=
/A> ] On Behalf Of Ruud Feringa</FONT>
<BR> <FONT SIZE=3D2>Sent: Monday, July 19, 2004 12:43 PM</FONT>
<BR> <FONT SIZE=3D2>To: perl-win32-admin@[...].com</FONT>
<BR> <FONT SIZE=3D2>Subject: Win32::FileSecurity problem</FONT>
</P>
<P> <FONT SIZE=3D2>Hi,</FONT>
</P>
<P> <FONT SIZE=3D2>I have a problem with setting acls with</FONT>
<BR> <FONT SIZE=3D2>Win32::FileSecurity::Set($filename,</FONT>
<BR> <FONT SIZE=3D2>\%perm )</FONT>
</P>
<P> <FONT SIZE=3D2>When the username in the permision hash is preceded wit=
h the domain name I get the following error:</FONT>
</P>
<P> <FONT SIZE=3D2><domain>\<username></FONT>
<BR> <FONT SIZE=3D2>Error handling errror: 1722, LookupAccountName at c:\p=
erl\eg\acl.pl line</FONT>
<BR> <FONT SIZE=3D2>45</FONT>
</P>
<P> <FONT SIZE=3D2>When I use the username only (so without <domain>=
\ ) I do not get this error, but because we are migrating to another doma=
in that's not what I want. By the way, the 'get' sub gives the account na=
mes WITH the domain part! What is going wrong?</FONT> </P>
<P> <FONT SIZE=3D2>any tips are welcome!</FONT>
</P>
<P> <FONT SIZE=3D2>-Ruud</FONT>
</P>
<P> <FONT SIZE=3D2>_______________________________________________________=
__________</FONT>
</P>
<P> <FONT SIZE=3D2>_______________________________________________________=
__________</FONT>
<BR> <FONT SIZE=3D2>Ook een gouden buddy worden in Messenger? Go for gold!=
</FONT>
<BR> <FONT SIZE=3D2><A HREF=3D"http://mobile.msn.com/?lc=3Dnl-nl" TARGET=3D=
"_blank"> http://mobile.msn.com/?lc=3Dnl-nl</A></FONT>
</P>
<P> <FONT SIZE=3D2>_______________________________________________</FONT>
<BR> <FONT SIZE=3D2>Perl-Win32-Admin mailing list</FONT>
<BR> <FONT SIZE=3D2>Perl-Win32-Admin@[...].com</FONT>
<BR> <FONT SIZE=3D2>To unsubscribe: <A HREF=3D"http://listserv.ActiveState=
=2Ecom/mailman/mysubs" TARGET=3D"_blank"> http://listserv.ActiveState.com/=
mailman/mysubs</A> </FONT>
</P>
<BR>
<BR>
<BR>
<P> <FONT SIZE=3D2>------------------------------</FONT>
</P>
<P> <FONT SIZE=3D2>Message: 3</FONT>
<BR> <FONT SIZE=3D2>Date: Tue, 20 Jul 2004 12:46:05 +0100</FONT>
<BR> <FONT SIZE=3D2>From: Conor Lillis <Conor@davy.ie></FONT>
<BR> <FONT SIZE=3D2>Subject: Ignore rogue EOF</FONT>
<BR> <FONT SIZE=3D2>To: "Perl-Win32-Admin (E-mail)"</FONT>
<BR> <FONT SIZE=3D2><perl-wi=
n32-admin@listserv.activestate.com></FONT>
<BR> <FONT SIZE=3D2>Message-ID:</FONT>
<BR> <FONT SIZE=3D2><9BF5458=
0E7ADD711BBAB00902793685104877957@exchange.davy.ie></FONT>
<BR> <FONT SIZE=3D2>Content-Type: text/plain; charset=3D"iso-8859-1&q=
uot;</FONT>
</P>
<P> <FONT SIZE=3D2>Hi, I havge a script qwhich analyses our Mailsweeper lo=
gs for traffic statistic purposes. Unfortunately some spam mailers have s=
tarted putting EOF chars (hex 1A) into the subject line, causing my scrip=
t to only partially load the log file when reading the file in. Is there =
a way to overcome this ?</FONT> </P>
<P> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>Here is the read statement that is failing, I can prov=
ide a snippet of the logfile as an attachment to anyone who is interested=
=2E.</FONT> </P>
<P> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>my $logfile=3D 'v:\\logfile\\20040715.log'; if (-e $lo=
gfile){open (LOG,"$logfile") || die $!;} @array =3D (<LOG>=
;); close(LOG); print "There are " .@array <<A HREF=3D"mailt=
o:.@array"> mailto:.@array</A>> ." lines in the file $logfile\n&qu=
ot;; print "Last line ".(@array-1)." is $array[@array-1]\n=
"; exit;</FONT> </P>
<BR>
<BR>
<P> <FONT SIZE=3D2>The information in this e-mail is confidential and may =
be legally privileged. It is intended solely for the addressee. Access to=
this e-mail by anyone else is unauthorised. If you are not the intended =
recipient, any disclosure, copying, distribution or any other action take=
n or any views, opinions or advice contained in this e-mail are those of =
the sending individual and not necessarily those of the firm. It is possi=
ble for data transmitted by e-mail to be deliberately or accidentally cor=
rupted or intercepted. For this reason where the communication is by e-ma=
il, J&E Davy does not accept any responsibility for any breach of con=
fidence which may arise from the use of this medium. If you have received=
this e-mail in error please notify us immediately at <A HREF=3D"mailto:helpdesk@davy.ie"> ma
ilto:helpdesk@davy.ie=
</A> and delete this e-mail from your system.</FONT></P>
<P> <FONT SIZE=3D2>-------------- next part --------------</FONT>
<BR> <FONT SIZE=3D2>An HTML attachment was scrubbed...</FONT>
<BR> <FONT SIZE=3D2>URL: <A HREF=3D"http://ASPN.ActiveState.com/ASPN/Mail/=
Browse/Threaded/perl-win32-admin/attachments/20040720/75b2d837/attachment=
-0001.htm" TARGET=3D"_blank"> http://ASPN.ActiveState.com/ASPN/Mail/Browse=
/Threaded/perl-win32-admin/attachments/20040720/75b2d837/attachment-0001.=
htm</A> </FONT></P>
<P> <FONT SIZE=3D2>------------------------------</FONT>
</P>
<P> <FONT SIZE=3D2>Message: 4</FONT>
<BR> <FONT SIZE=3D2>Date: Tue, 20 Jul 2004 14:44:52 +0200</FONT>
<BR> <FONT SIZE=3D2>From: "Dutrieux Yves" <YDU@cph.be></FO=
NT>
<BR> <FONT SIZE=3D2>Subject: RE: Ignore rogue EOF</FONT>
<BR> <FONT SIZE=3D2>To: "Conor Lillis" <Conor@davy.ie>, &q=
uot;Perl-Win32-Admin \(E-mail\)"</FONT>
<BR> <FONT SIZE=3D2><perl-wi=
n32-admin@listserv.ActiveState.com></FONT>
<BR> <FONT SIZE=3D2>Message-ID: <04Jul20.144009cest.334081@fire02.cph.b=
e></FONT>
<BR> <FONT SIZE=3D2>Content-Type: text/plain; charset=3D"iso-8859-1&q=
uot;</FONT>
</P>
<P> <FONT SIZE=3D2>Try to read the log in binary mode.</FONT>
<BR> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>open LOG, "<:raw","$logfile" or=
die $! ;</FONT>
<BR> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>Yves</FONT>
</P>
<P> <FONT SIZE=3D2>________________________________</FONT>
</P>
<P> <FONT SIZE=3D2>De : perl-win32-admin-bounces@[...].com =
[<A HREF=3D"mailto:perl-win32-admin-bounces@listserv.ActiveState.com"> mai=
lto:perl-win32-admin-bounces@[...].com</A> ] De la part de =
Conor Lillis Envoy=E9 : mardi 20 juillet 2004 13:46 =C0 : Perl-Win32-Admi=
n (E-mail) Objet : Ignore rogue EOF</FONT> </P>
<BR>
<P> <FONT SIZE=3D2>Hi, I havge a script qwhich analyses our Mailsweeper lo=
gs for traffic statistic purposes. Unfortunately some spam mailers have s=
tarted putting EOF chars (hex 1A) into the subject line, causing my scrip=
t to only partially load the log file when reading the file in. Is there =
a way to overcome this ?</FONT> </P>
<P> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>Here is the read statement that is failing, I can prov=
ide a snippet of the logfile as an attachment to anyone who is interested=
=2E.</FONT> </P>
<P> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>my $logfile=3D 'v:\\logfile\\20040715.log'; if (-e $lo=
gfile){open (LOG,"$logfile") || die $!;} @array =3D (<LOG>=
;); close(LOG); print "There are ".@array." lines in the f=
ile $logfile\n"; print "Last line ".(@array-1)." is $=
array[@array-1]\n"; exit;</FONT> </P>
<BR>
<BR>
<P> <FONT SIZE=3D2>The information in this e-mail is confidential and may =
be legally privileged. It is intended solely for the addressee. Access to=
this e-mail by anyone else is unauthorised. If you are not the intended =
recipient, any disclosure, copying, distribution or any other action take=
n or any views, opinions or advice contained in this e-mail are those of =
the sending individual and not necessarily those of the firm. It is possi=
ble for data transmitted by e-mail to be deliberately or accidentally cor=
rupted or intercepted. For this reason where the communication is by e-ma=
il, J&E Davy does not accept any responsibility for any breach of con=
fidence which may arise from the use of this medium. If you have received=
this e-mail in error please notify us immediately at <A HREF=3D"mailto:helpdesk@davy.ie"> ma
ilto:helpdesk@davy.ie=
</A> and delete this e-mail from your system.</FONT></P>
<P> <FONT SIZE=3D2>-------------- next part --------------</FONT>
<BR> <FONT SIZE=3D2>An HTML attachment was scrubbed...</FONT>
<BR> <FONT SIZE=3D2>URL: <A HREF=3D"http://ASPN.ActiveState.com/ASPN/Mail/=
Browse/Threaded/perl-win32-admin/attachments/20040720/2b854263/attachment=
-0001.htm" TARGET=3D"_blank"> http://ASPN.ActiveState.com/ASPN/Mail/Browse=
/Threaded/perl-win32-admin/attachments/20040720/2b854263/attachment-0001.=
htm</A> </FONT></P>
<P> <FONT SIZE=3D2>------------------------------</FONT>
</P>
<P> <FONT SIZE=3D2>Message: 5</FONT>
<BR> <FONT SIZE=3D2>Date: Tue, 20 Jul 2004 14:06:43 +0100</FONT>
<BR> <FONT SIZE=3D2>From: colin_e <colin_e@bigfoot.com></FONT>
<BR> <FONT SIZE=3D2>Subject: Re: Ignore rogue EOF</FONT>
<BR> <FONT SIZE=3D2>To: Conor Lillis <Conor@davy.ie></FONT>
<BR> <FONT SIZE=3D2>Cc: "Perl-Win32-Admin \(E-mail\)"</FONT>
<BR> <FONT SIZE=3D2><perl-wi=
n32-admin@listserv.ActiveState.com></FONT>
<BR> <FONT SIZE=3D2>Message-ID: <40FD18E3.6060502@bigfoot.com></FONT=
>
<BR> <FONT SIZE=3D2>Content-Type: text/plain; charset=3D"us-ascii&quo=
t;</FONT>
</P>
<P> <FONT SIZE=3D2>As you are running on Windows you may need to use binmo=
de() on your log file to make the read ignore the EOF character.</FONT>
</P>
<P> <FONT SIZE=3D2>Regards: Colin</FONT>
</P>
<P> <FONT SIZE=3D2>Conor Lillis wrote:</FONT>
</P>
<P> <FONT SIZE=3D2>> Hi, I havge a script qwhich analyses our Mailsweep=
er logs for traffic </FONT>
<BR> <FONT SIZE=3D2>> statistic purposes. Unfortunately some spam maile=
rs have started </FONT>
<BR> <FONT SIZE=3D2>> putting EOF chars (hex 1A) into the subject line,=
causing my script to </FONT>
<BR> <FONT SIZE=3D2>> only partially load the log file when reading the=
file in. Is there a </FONT>
<BR> <FONT SIZE=3D2>> way to overcome this ?</FONT>
<BR> <FONT SIZE=3D2>> </FONT>
<BR> <FONT SIZE=3D2>> Here is the read statement that is failing, I can=
provide a snippet of </FONT>
<BR> <FONT SIZE=3D2>> the logfile as an attachment to anyone who is int=
erested..</FONT>
<BR> <FONT SIZE=3D2>> </FONT>
<BR> <FONT SIZE=3D2>> my $logfile=3D 'v:\\logfile\\20040715.log'; if (-=
e $logfile){open </FONT>
<BR> <FONT SIZE=3D2>> (LOG,"$logfile") || die $!;} @array =3D=
(<LOG>); close(LOG); print </FONT>
<BR> <FONT SIZE=3D2>> "There are ".@array <<A HREF=3D"mail=
to:.@array"> mailto:.@array</A>>." lines in the file $logfile\n&qu=
ot;; </FONT>
<BR> <FONT SIZE=3D2>> print "Last line ".(@array-1)." is=
$array[@array-1]\n"; exit;</FONT>
<BR> <FONT SIZE=3D2>></FONT>
<BR> <FONT SIZE=3D2>></FONT>
<BR> <FONT SIZE=3D2>> The information in this e-mail is confidential an=
d may be legally </FONT>
<BR> <FONT SIZE=3D2>> privileged. It is intended solely for the address=
ee. Access to this </FONT>
<BR> <FONT SIZE=3D2>> e-mail by anyone else is unauthorised. If you are=
not the intended </FONT>
<BR> <FONT SIZE=3D2>> recipient, any disclosure, copying, distribution =
or any other action </FONT>
<BR> <FONT SIZE=3D2>> taken or any views, opinions or advice contained =
in this e-mail are </FONT>
<BR> <FONT SIZE=3D2>> those of the sending individual and not necessari=
ly those of the firm.</FONT>
<BR> <FONT SIZE=3D2>> It is possible for data transmitted by e-mail to =
be deliberately or </FONT>
<BR> <FONT SIZE=3D2>> accidentally corrupted or intercepted. For this r=
eason where the </FONT>
<BR> <FONT SIZE=3D2>> communication is by e-mail, J&E Davy does not=
accept any </FONT>
<BR> <FONT SIZE=3D2>> responsibility for any breach of confidence which=
may arise from the </FONT>
<BR> <FONT SIZE=3D2>> use of this medium. If you have received this e-m=
ail in error please </FONT>
<BR> <FONT SIZE=3D2>> notify us immediately at <A HREF=3D"mailto:helpde=
sk@davy.ie"> mailto:helpdesk@[...].ie</A> and delete this </FONT>
<BR> <FONT SIZE=3D2>> e-mail from your system.</FONT>
<BR> <FONT SIZE=3D2>></FONT>
<BR> <FONT SIZE=3D2>>--------------------------------------------------=
---------------------</FONT>
<BR> <FONT SIZE=3D2>>-</FONT>
<BR> <FONT SIZE=3D2>></FONT>
<BR> <FONT SIZE=3D2>>_______________________________________________</F=
ONT>
<BR> <FONT SIZE=3D2>>Perl-Win32-Admin mailing list</FONT>
<BR> <FONT SIZE=3D2>>Perl-Win32-Admin@[...].com</FONT>
<BR> <FONT SIZE=3D2>>To unsubscribe: <A HREF=3D"http://listserv.ActiveS=
tate.com/mailman/mysubs" TARGET=3D"_blank"> http://listserv.ActiveState.co=
m/mailman/mysubs</A> </FONT>
<BR> <FONT SIZE=3D2>> </FONT>
<BR> <FONT SIZE=3D2>></FONT>
</P>
<P> <FONT SIZE=3D2>-------------- next part --------------</FONT>
<BR> <FONT SIZE=3D2>An HTML attachment was scrubbed...</FONT>
<BR> <FONT SIZE=3D2>URL: <A HREF=3D"http://ASPN.ActiveState.com/ASPN/Mail/=
Browse/Threaded/perl-win32-admin/attachments/20040720/1bc1099d/attachment=
-0001.htm" TARGET=3D"_blank"> http://ASPN.ActiveState.com/ASPN/Mail/Browse=
/Threaded/perl-win32-admin/attachments/20040720/1bc1099d/attachment-0001.=
htm</A> </FONT></P>
<P> <FONT SIZE=3D2>------------------------------</FONT>
</P>
<P> <FONT SIZE=3D2>Message: 6</FONT>
<BR> <FONT SIZE=3D2>Date: Tue, 20 Jul 2004 18:40:23 +0100</FONT>
<BR> <FONT SIZE=3D2>From: Conor Lillis <Conor@davy.ie></FONT>
<BR> <FONT SIZE=3D2>Subject: RE: Ignore rogue EOF</FONT>
<BR> <FONT SIZE=3D2>To: Conor Lillis <Conor@davy.ie>, "Perl-Win=
32-Admin (E-mail)"</FONT>
<BR> <FONT SIZE=3D2><perl-wi=
n32-admin@listserv.activestate.com></FONT>
<BR> <FONT SIZE=3D2>Message-ID:</FONT>
<BR> <FONT SIZE=3D2><9BF5458=
0E7ADD711BBAB00902793685104877961@exchange.davy.ie></FONT>
<BR> <FONT SIZE=3D2>Content-Type: text/plain; charset=3D"iso-8859-1&q=
uot;</FONT>
</P>
<P> <FONT SIZE=3D2>I overcame the issue by inserting the following line</F=
ONT>
<BR> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>use open IN =3D> ":raw";</FONT>
</P>
<P> <FONT SIZE=3D2>many thanks to colin_e and Dutrieux Yves for steering m=
e in the right direction !</FONT>
</P>
<P> <FONT SIZE=3D2>-----Original Message-----</FONT>
<BR> <FONT SIZE=3D2>From: Conor Lillis [<A HREF=3D"mailto:Conor@davy.ie">m=
ailto:Conor@[...].ie</A> ]</FONT>
<BR> <FONT SIZE=3D2>Sent: 20 July 2004 12:46</FONT>
<BR> <FONT SIZE=3D2>To: Perl-Win32-Admin (E-mail)</FONT>
<BR> <FONT SIZE=3D2>Subject: Ignore rogue EOF</FONT>
</P>
<BR>
<P> <FONT SIZE=3D2>Hi, I havge a script qwhich analyses our Mailsweeper lo=
gs for traffic statistic purposes. Unfortunately some spam mailers have s=
tarted putting EOF chars (hex 1A) into the subject line, causing my scrip=
t to only partially load the log file when reading the file in. Is there =
a way to overcome this ?</FONT> </P>
<P> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>Here is the read statement that is failing, I can prov=
ide a snippet of the logfile as an attachment to anyone who is interested=
=2E.</FONT> </P>
<P> <FONT SIZE=3D2> </FONT>
<BR> <FONT SIZE=3D2>my $logfile=3D 'v:\\logfile\\20040715.log'; if (-e $lo=
gfile){open (LOG,"$logfile") || die $!;} @array =3D (<LOG>=
;); close(LOG); print "There are " .@array <<A HREF=3D"mailt=
o:.@array"> mailto:.@array</A>> ." lines in the file $logfile\n&qu=
ot;; print "Last line ".(@array-1)." is $array[@array-1]\n=
"; exit;</FONT> </P>
<BR>
<BR>
<P> <FONT SIZE=3D2>The information in this e-mail is confidential and may =
be legally privileged. It is intended solely for the addressee. Access to=
this e-mail by anyone else is unauthorised. If you are not the intended =
recipient, any disclosure, copying, distribution or any other action take=
n or any views, opinions or advice contained in this e-mail are those of =
the sending individual and not necessarily those of the firm. It is possi=
ble for data transmitted by e-mail to be deliberately or accidentally cor=
rupted or intercepted. For this reason where the communication is by e-ma=
il, J&E Davy does not accept any responsibility for any breach of con=
fidence which may arise from the use of this medium. If you have received=
this e-mail in error please notify us immediately at <A HREF=3D"mailto:helpdesk@davy.ie"> ma
ilto:helpdesk@davy.ie=
</A> and delete this e-mail from your system.</FONT></P>
<BR>
<BR>
<BR>
<P> <FONT SIZE=3D2>The information in this e-mail is confidential and may =
be legally privileged. It is intended solely for the addressee. Access to=
this e-mail by anyone else is unauthorised. If you are not the intended =
recipient, any disclosure, copying, distribution or any other action take=
n or any views, opinions or advice contained in this e-mail are those of =
the sending individual and not necessarily those of the firm. It is possi=
ble for data transmitted by e-mail to be deliberately or accidentally cor=
rupted or intercepted. For this reason where the communication is by e-ma=
il, J&E Davy does not accept any responsibility for any breach of con=
fidence which may arise from the use of this medium. If you have received=
this e-mail in error please notify us immediately at <A HREF=3D"mailto:helpdesk@davy.ie"> ma
ilto:helpdesk@davy.ie=
</A> and delete this e-mail from your system.</FONT></P>
<P> <FONT SIZE=3D2>-------------- next part --------------</FONT>
<BR> <FONT SIZE=3D2>An HTML attachment was scrubbed...</FONT>
<BR> <FONT SIZE=3D2>URL: <A HREF=3D"http://ASPN.ActiveState.com/ASPN/Mail/=
Browse/Threaded/perl-win32-admin/attachments/20040720/a289f492/attachment=
=2Ehtm" TARGET=3D"_blank"> http://ASPN.ActiveState.com/ASPN/Mail/Browse/Th=
readed/perl-win32-admin/attachments/20040720/a289f492/attachment.htm</A> <=
/FONT> </P>
<P> <FONT SIZE=3D2>------------------------------</FONT>
</P>
<P> <FONT SIZE=3D2>_______________________________________________</FONT>
<BR> <FONT SIZE=3D2>Perl-Win32-Admin mailing list</FONT>
<BR> <FONT SIZE=3D2>Perl-Win32-Admin@[...].com</FONT>
<BR> <FONT SIZE=3D2>To unsubscribe: <A HREF=3D"http://listserv.ActiveState=
=2Ecom/mailman/mysubs" TARGET=3D"_blank"> http://listserv.ActiveState.com/=
mailman/mysubs</A> </FONT>
</P>
<BR>
<P> <FONT SIZE=3D2>End of Perl-Win32-Admin Digest, Vol 6, Issue 15</FONT>
<BR> <FONT SIZE=3D2>***********************************************</FONT>
<BR> <FONT SIZE=3D2>*** Diese Mail wurde nach gef=E4hrlichen Inhalten gesc=
annt ***</FONT>
<BR> <FONT SIZE=3D2>*** WICHTIG: Bitte Vorsicht beim =D6ffnen von Mailanh=E4=
ngen von unbekannten oder verd=E4chtigen Absendern ***</FONT>
</P>
<P> <FONT SIZE=3D2>*** eSafe scanned this email for malicious content ***<=
/FONT>
<BR> <FONT SIZE=3D2>*** IMPORTANT: Do not open attachments from unrecogniz=
ed senders ***</FONT>
</P>
<P> <FONT SIZE=3D2>All for One Systemhaus AG, Abteilung Professional Servi=
ces</FONT>
</P>
</BODY>
</HTML>
------_=_NextPart_001_01C46EE7.E4C960C0--
Attachments:
unknown1
|
