RE: Problem compiling VC++ module with XS
On Tue, 22 Feb 2005 [EMAIL PROTECTED] wrote: > Hi Rob, > > Thanks for the hint. But the option -TP directs vc++ to > handle all files as C++. The problems are maros defined in > lib\CORE\win32iop.h that redefine standard C function > declarations. The same functions (i.e. eof) are declared > in some standard classes but with a different signature. > The preprocessor output causing the errors istream.h(108 - > 110): > > class __declspec(dllimport) istream : virtual public ios { > ... > istream& win32_read(char *,int,); > inline istream& win32_read(unsigned char *,int,); > inline istream& win32_read(signed char *,int,); > ... Without knowing the specifics, could you do a #ifdef problem_function #undef problem_function #endif at an appropriate place in the xs file? -- best regards, randy kobes ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Problem compiling VC++ module with XS
[EMAIL PROTECTED] wrote: Hi Rob, Thanks for the hint. But the option -TP directs vc++ to handle all files as C++. Sorry - missed that, but *did* notice the syntax errors - and thought they might be arising because the cpp files were being treated as c files. I don't think I can help. Try the comp.lang.perl.modules Newsgroup, if you can't find a satisfactory answer elsewhere. Cheers, Rob ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Win32::OLE : Bizarre Push while Examining IE Events
Hi Andrew, I really don't know what's going on, but I have tried running MSAccess as an OLE automation server; you too are obviously running IE as an OLE automation server. I hate it when people tell me something can't be done, but I really doubt that you can call events from a COM object via a perl script... It MAY be possible from a VB program, because (I believe this is how it works) both are bound at runtime via the VB6RT.DLL... but I may be wrong... if you findan answer to this, PLEASE POST I worked on a similar project a few weeks ago- I had to implement a report server in Perl to run MS Access reports and deliver the snapshot (*.snp) to the browser- I discovered that I could not run an OLE method - $access->DoCmd->RunReport() got an error; "You cannot run this method at this time" "this time" was a code-phrase for "you cannot run this method at ANY time [:-)] I was able to solve my problem by writing a VB program that "bridged" my OLE automation request from the Perl script, and notified the script via some pretty clunky means that I'm too embarassed to get into here. HTH KC On Sun, 20 Feb 2005 10:09:13 -0700, Andrew McFarlane <[EMAIL PROTECTED]> wrote: > I need help in figuring out how to prevent an exception from occurring when > I try to examine Internet Explorer browser events using Win32::OLE. Thanks > in advance for your help. > > I have a library that allows one to drive Internet Explorer. My code runs > well until I try to examine the window events by using the Win32::OLE > WithEvents method. When I uncomment the line of code that sets the event > handler, I get the error message: > > Bizarre copy of HASH in push at C:/Perl/site/lib/Win32/OLE/Lite.pm line 168 > (#2) > > (P) Perl detected an attempt to copy an internal value that is not > copyable. > > Uncaught exception from user code: > Bizarre copy of HASH in push at C:/Perl/site/lib/Win32/OLE/Lite.pm > line > 168. > > Line 168 of OLE::Lite is inside of the "in" method definition--I call that > method when I'm iterating through a collection of Win32::OLE IE objects. > > Here's a snippet of code: > > I initialize a browser and set the browser event handler: > > # Launch Internet Explorer. > $oleBrowserRef = Win32::OLE->new("InternetExplorer.Application") > or croak "${CLASS}::new Could not open an Internet Explorer browser: > ",Win32::OLE->LastError(),"\n"; > > # Register window events. > Win32::OLE->WithEvents($oleBrowserRef, \&browserEventHandler, > "DWebBrowserEvents2"); > > Here is the browser event handler: > > sub browserEventHandler { > my ($browser,$event,@args) = @_; > > my $URL = $browser->{URL}; > > if( $DEBUG ) { > > print "DEBUG: ${CLASS}::browserEventHandler: Event: $event "; > > foreach my $arg (@args) { > my $value = $arg; > $value = sprintf "[%s %s]", > Win32::OLE->QueryObjectType($value) > if UNIVERSAL::isa($value, 'Win32::OLE'); > print "\targ: $value\n"; > } > print "\n"; > > } > > 1; > } > > Thanks for your help. > > Andrew McFarlane > > ___ > Perl-Win32-Users mailing list > Perl-Win32-Users@listserv.ActiveState.com > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: HTTP synch
Title: RE: HTTP synch Thanks to all who suggested the wget -m option, it is just the ticket ! Must read the man file more closely in future Must read the man file more closely in future Must read the man file more closely in future.. -Original Message- From: Darryl Ross [mailto:[EMAIL PROTECTED]] Sent: 22 February 2005 13:20 To: Conor Lillis Cc: Perl List (E-mail); PERL Win32 Users (E-mail); Perl-Unix-Users (E-mail); Perl-Win32-Admin (E-mail) Subject: Re: HTTP synch -BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Conor Lillis wrote: | Hi, | I have a script that uses shells to run a wget command, in order to | synch a web site with a local folder. The web site is the source and the | local folder is the destination. | | Currently it just blindly copies the website down to the local folder | without performing any checks. However, I would like to modify the | functionality to verify the local files and the server files are the | same size, to reduce traffic during the transfer process and the | duration of the script. | | My connection to the web server is fast, but there are several (~100) GB | of data to be synched.. | Anyone have any ideas ? man wget Check out the '-m' switch. Regards Darryl -BEGIN PGP SIGNATURE- Version: GnuPG v1.2.1 (MingW32) iD8DBQFCGzF3/XQ6DbmPjokRAqvPAJ4plNuif0ogISoLPJHLJx6/wNl3AgCeNbsN j916Ls3En5B4UjNw7s1iAr0= =Bf5K -END PGP SIGNATURE- 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:[EMAIL PROTECTED] and delete this e-mail from your system. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: regex confusion...
I broke it with brackets, parenthetically speaking. Thanks all - simple mind making a simple mistake. -Original Message- From: Peter Eisengrein [mailto:[EMAIL PROTECTED] Sent: Monday, February 21, 2005 5:05 PM To: 'Perl-Win32-Users Mailing List (E-mail)' Subject: RE: regex confusion... sorry about that. a bit too quick on the trigger finger. I have the following: @files = grep { /^ccs_[cas|pri|atsm]/ && -f "$dir/$_" } readdir(DIR); There are other files in $dir that start with ccs but I only want ccs_cas ccs_pri or ccs_atsm but for some reason it seems to also match a filename that starts with ccs_trsum. What am I doing wrong? -Original Message- From: Peter Eisengrein Sent: Monday, February 21, 2005 5:02 PM To: Perl-Win32-Users Mailing List (E-mail) Subject: regex confusion... Hey gang... having a bit of a regex conundrum. I have the following statement: Message transport security by GatewayDefender 5:05:28 PM ET - 2/21/2005 ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: How can I do this?
Well to do it as "a bookmark" where they just go to it and bam, it's all there, u can make the page an autosubmiting form with javascript. As in as soon as they load the page, the javascript submits the form containing the path to the file. U can hide the guts underneath a div layer and have the user just see a "scanning for updates" thingy while it loads and submits. At 01:23 PM 2/22/05 +, steve silvers wrote: >I know it can be done this way, but I was hoping for the end user to not >have to push a submit button though. That way when they call my software >update page it automatically grabs this file then my script can display the >needed software update links. Remember the end user is a very dumb creature, >just trying to make this fool proof ;-) > >Steve > -- REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=-- "...ne cede males" 0100 ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: HTTP synch
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Conor Lillis wrote: | Hi, | I have a script that uses shells to run a wget command, in order to | synch a web site with a local folder. The web site is the source and the | local folder is the destination. | | Currently it just blindly copies the website down to the local folder | without performing any checks. However, I would like to modify the | functionality to verify the local files and the server files are the | same size, to reduce traffic during the transfer process and the | duration of the script. | | My connection to the web server is fast, but there are several (~100) GB | of data to be synched.. | Anyone have any ideas ? man wget Check out the '-m' switch. Regards Darryl -BEGIN PGP SIGNATURE- Version: GnuPG v1.2.1 (MingW32) iD8DBQFCGzF3/XQ6DbmPjokRAqvPAJ4plNuif0ogISoLPJHLJx6/wNl3AgCeNbsN j916Ls3En5B4UjNw7s1iAr0= =Bf5K -END PGP SIGNATURE- ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
HTTP synch
Title: HTTP synch Hi, I have a script that uses shells to run a wget command, in order to synch a web site with a local folder. The web site is the source and the local folder is the destination. Currently it just blindly copies the website down to the local folder without performing any checks. However, I would like to modify the functionality to verify the local files and the server files are the same size, to reduce traffic during the transfer process and the duration of the script. My connection to the web server is fast, but there are several (~100) GB of data to be synched.. Anyone have any ideas ? regards, Conor 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:[EMAIL PROTECTED] and delete this e-mail from your system. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: PGP for perl
[EMAIL PROTECTED] wrote: > Hi all, > > Any good hints for PGP solutions? I need to ftp a file but need to encrypt > it first using PGP. Does it have to be PGP ? I have an RSA solution that may suffice. -- ,-/- __ _ _ $Bill LuebkertMailto:[EMAIL PROTECTED] (_/ / )// // DBE CollectiblesMailto:[EMAIL PROTECTED] / ) /--< o // // Castle of Medieval Myth & Magic http://www.todbe.com/ -/-' /___/_<_http://dbecoll.tripod.com/ (My Perl/Lakers stuff) ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
PGP for perl
Hi all, Any good hints for PGP solutions? I need to ftp a file but need to encrypt it first using PGP. Thanks Peter. __ This message may contain privileged information. If you have received this message by mistake, please keep it confidential and return it to the sender. Although we have taken steps to minimise the risk of transmitting software viruses, the EBRD accepts no liability for any loss or damage caused by computer viruses and would advise you to carry out your own virus checks. The contents of this e-mail do not necessarily represent the views of the EBRD. ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Request Info
If it dies intermittently I would put in some code to catch the error and retry it a few times. At 01:30 PM 2/22/05 +0530, Rajesh Vattem wrote: > >Hi, >I am facing an issue with reading/writing COM port. I am using Win32 serial >port API for this purpose. The problem is that some times opening or closing >COM port handle fails and the program dies. Because of this the test session >I execute terminates abruptly. I call this perl script from a GUI written in >VC. Can somebody help me with the possible issue by looking into the code >for the subroutines open_tm200_serial_port, close_tm200_serial_port, the way >I read from the COM port, and tell me whether something is done incorrectly >because of which this is happening. >Thanks & Regards, >Rajesh. -- REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=-- "...ne cede males" 0100 ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Problem compiling VC++ module with XS
Hi Rob, Thanks for the hint. But the option -TP directs vc++ to handle all files as C++. The problems are maros defined in lib\CORE\win32iop.h that redefine standard C function declarations. The same functions (i.e. eof) are declared in some standard classes but with a different signature. The preprocessor output causing the errors istream.h(108 - 110): class __declspec(dllimport) istream : virtual public ios { ... istream& win32_read(char *,int,); inline istream& win32_read(unsigned char *,int,); inline istream& win32_read(signed char *,int,); ... Regards Thomas -Original Message- From: Sisyphus [mailto:[EMAIL PROTECTED] Sent: Monday, February 21, 2005 10:02 PM To: [EMAIL PROTECTED] Cc: perl-win32-users@listserv.ActiveState.com Subject: Re: Problem compiling VC++ module with XS [EMAIL PROTECTED] wrote: > Hi List, > > I'm trying to compile a C++ XS module with MS VC++ 6.0. Due to defines > (redifinition of standard c funktions like eof) in win32iop.h several > VC++ standard headers throw errors: > > cl -c -I. -TP -MD -Zi -DNDEBUG -O1 -DVERSION=\"0.01\" -DXS_VERSION=\"0.01\" > "-ID:\Perl\lib\CORE" -DWIN32 MyPackage.c MyPackage.c I *think* that if it's C++ code, then 'MyPackage.c' needs to be called 'MyPackage.cpp' with VC++ 6.0. Cheers, Rob ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Request Info
Hi, I am facing an issue with reading/writing COM port. I am using Win32 serial port API for this purpose. The problem is that some times opening or closing COM port handle fails and the program dies. Because of this the test session I execute terminates abruptly. I call this perl script from a GUI written in VC. Can somebody help me with the possible issue by looking into the code for the subroutines open_tm200_serial_port, close_tm200_serial_port, the way I read from the COM port, and tell me whether something is done incorrectly because of which this is happening. Thanks & Regards, Rajesh. <> ** The information contained in this email and any attachments is likely to be confidential and legally privileged, and is for the intended recipient named above only. Any copying, dissemination, disclosure of or use of this email or its attachments unless authorised by us is prohibited, except that you may forward this email and/or attachments to a third party on a strict "need to know" basis. If you have received this email in error, please notify us immediately by replying to the email or by calling +91-80-22297030. Please then delete this email and any full or partial copies of it. You as the intended recipient must be aware and accept that emailis not a totally secure communications medium. Although we have taken all reasonable steps to make sure this email and any attachments are free from viruses, we do not (to the extent permitted by law) accept any liability whatsoever for any virus infection and/or compromise of security caused by this email and any attachment. No contract may be formed or documents served by you on or with us by this email or any attachments unless expressly agreed otherwise by us. Any views expressed in this email or attachments by an individual are not necessarily those of UbiNetics India (Private) Limited. ** test.pl Description: Binary data ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs