I have a basic project in which I need to break a larger file down into
35 separate files. I was under the impression that use FileHandle would
store the object in $fh. I could then create a a copy of my file, save
the associated object in a hash array and print some header information
for the fi
First of all, thank you for all the help you have provided in the past,
especially Bill!
My situation: I have written an application that needs to access the
Crystal Reports (version 8.5) API to print documents based on parameters
issued by command line. One of my customer's customers wants to u
> -Original Message-
> From: Bill Luebkert
> >
> > So, my DEVMODE is a defines as
> >
> > DEVMODE * FAR *mode
> >
> > How does one unpack a double pointer to a struct?
>
> I would assume define it as a ptr:
> my $mode = pack 'P', 0;
>
> And then you would need to do something
> -Original Message-
> From: Bill Luebkert
>
> Adam R. Frielink wrote:
> >
> > The particular section of code in which the error occurs is:
> >
> > ___CODE___
> > my $PEGetSelectedPrinter = new Win32::API 'crpe32',
> >
I have hit a road block using the Win32-API module. I've gotten a
working tool which allows me to modify the contents of the Crystal
Reports RPT file in memory using the API interface. Unfortunately,
everytime I attempt to access a particular method, my application fails
with a very non-specific
In the future, you may want to post using Plain Text instead of RTF or HTML.
More people may respond.
Check out the documentation on module File::Basename
use File::Basename;
($name,$path,$suffix) = fileparse($fullname,@suffixlist);
$name = fileparse($fullname,@suffixlist);
fil
I've had some trouble with a commandline syntax for a string search and
replace using a perl command line.
My cmd line was:
perl -pi -e 's!\xae!\&\#169!g'
This did not replace the occurace hex EA
The script for what that above cmd line should compile into (according
to the Camel Book) is:
__B
>-Original Message-
>From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Mulley, Nikhil
>Sent: Monday, October 18, 2004 5:32 AM
>
>Exactly , I am doing it from past 2 days on my machine , but failing on
remote machines.
>
>And I am not sure which version of Firefox is being used
I cannot seem to work out the syntax for Using MIME::Lite through an
SMTP server that requires authentication.
I can send properly through a server that doesn't require authorization,
so I need to work out the proper way to pass in authentication.
MIME::Lite->send('smtp', $mailtags{mailsmtp}, Ti
> So what u really need to do here is MIME decode/encode a
> string with ur own code?
Yes
> If $cnvstr represents the mapping to and from the
> encoded version,
> it's better to do that with a hash. The key will be the
> character and the
> value will be it's decimal/encoded value. $maphas
> -Original Message-
> From: $Bill Luebkert [mailto:[EMAIL PROTECTED]
> Sent: Friday, March 04, 2005 9:48 AM
> To: Adam R. Frielink
> Cc: Perl-Win32-Users@listserv.ActiveState.com
> Subject: Re: m// and pos functionality
>
> Adam R. Frielink wrote:
>
> &
I am working on a function to handle some character mapping to an
encoded set of bytes. I need to be able to encode and decode. Encoding
the values works perfectly. Decoding is my problem.
I originally was trying to use pattern matching to find the position of
the encoded and then do a simple '
> As far as I know, Win32::GUI fits that criteria.
>
> On approximately 1/20/2005 10:06 AM, came the following
> characters from
> the keyboard of Robert Suchocki:
> >
> > Is there a GUI interface for Perl scripting/programming
> that can be
> > used with Windows98SE?
>
He might be lookin
I'd Suggest looking at the grep function. Use a negating regex and it will
return the 29 values you want.
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Mulley,
Nikhil
Sent: Friday, December 24, 2004 8:20 AM
To: perl-wi
> And also which module do you propose for using dlls in perl?
Look into Win32::API
Thank you.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
You could use the wperl.exe rather than the perl.exe
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On
> Behalf Of Laurent Duperval
> Sent: Friday, December 10, 2004 9:29 AM
> To: [EMAIL PROTECTED]
> Subject: Running scheduled task without showing the window
>
> I try to manipulate bits in perl (this si not easy)
> The script below fails when using >> and << operator.
> Can someone explain me what's wrong ???
>
>
> $xx=chr(16).chr(17);
>
> print unpack('B*',$xx); #print 000100010001 - OK
> print "\n";
> $xx=$xx | (chr(255).ch
> -Original Message-
> From: Theisen, Gary [mailto:[EMAIL PROTECTED]
> Sent: Monday, November 22, 2004 11:13 AM
> To: 'Bharucha, Nikhil'; Adam R. Frielink;
> '[EMAIL PROTECTED]'
> Subject: RE: Perl.exe VS JAVA for FTP function
>
> Thanks for
In the future, please post in plain text.
Do you need to PAR the file? Most *nix come with a version of Perl
preinstalled. If that is the case, is it possible to just run a simple
.pl script (< 10k, I am sure)? Or do you need to 'hide' the source for
some reason?
Functionality would/should be
Anyone know of a faxing product built on Perl?
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On
> Behalf Of MJG
> Sent: Thursday, October 28, 2004 10:33 AM
> To: [EMAIL PROTECTED]
> Subject: RE: SID Collection
>
> Trying to use a simple setup for TieRegistry. Although it is readying
> the keys, can't
>-Original Message-
>From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Mulley, Nikhil
>Sent: Monday, October 18, 2004 5:32 AM
>
>Exactly , I am doing it from past 2 days on my machine , but failing on
remote machines.
>
>And I am not sure which version of Firefox is being used
>
>
> I would guess that $flist would need the same escaping on the
> \ that the
> first part of your UNC path has or change to ''..
>
> HTH
>
> Steven
>
No luck on escaping the '\' either. Anyone have another idea?
>
>
>> unlink "SERVER\\C\$" . $flist;
>>
>> $flist contains "\TEM
unlink "SERVER\\C\$" . $flist;
$flist contains "\TEMP\file.tar.gz";
When unlink executes, I get the error 'No such file or directory'.
I know I can access these files as I perform a copy from the remote
server to my backup server using the same path. Is this an issue with
unlink?
_
I am trying to install a 'print-to-file' printer using an OLE interface.
The commented code below is an example VB script that I seem not to be
able to duplicate in perl. Can anyone see my problem?
___Begin___
#Set objWMIService = GetObject("winmgmts:")
#Set objDriver = objWMIService.Get("Win32
Sorry for the double response, I copied the wrong link.
file:///C:/Perl/html/Windows/ActiveServerPages.html
> If you installed your copy of Activeperl in the default directory on
> your C drive, check out this FAQ.
>
file:///C:/Perl/html/faq/Windows/ActivePerl-Winfaq7.html
If you installed your copy of Activeperl in the default directory on
your C drive, check out this FAQ.
file:///C:/Perl/html/faq/Windows/ActivePerl-Winfaq7.html
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On
> Behalf Of ncaa-hoops
> Sent: Thursday, Septembe
>
> why is a temporary file a problem?
Before Archive::Zip attempts to deflate any files, it builds a complete
file list of ALL files to be added to the archive. When a file in the
build list does not exist at the time the archive is created, it causes
the Archive::Zip to build an invalid archiv
I am trying to archive a very large directory tree. The zip file is
approximately 1.4 Gb in size at the end of the job. Unfortunately, many
times a temporary file exists when the file list is built internally by
Archive::Zip that doesn't exist 10 minutes later when the attempt to
deflate that fil
>
> Using Win32::API with Crystal reports, the following code
> throws a SEGV on
> the last line on my $PEGetSQLQuery->Call(). The SEGV is
> caused by an access
> violation (as per the C++ debugger)
>
> my $PEGetSQLQuery = new Win32::API 'crpe32', 'PEGetSQLQuery',
> 'INI', 'I';
> if(not defin
Below are 2 sections of code, the second works properly for selecting
the printer for which a Crystal Report will print via the API. The
first section is written to allow the user to send the report to any of
the installed printers on his machine.
Does anyone see an error in this code, compared
Title: Message
In the
future, please post in plain text too.
I have
had great success with Win32::ODBC and the TEXT::CSV_XS routines for
parsing and manipulating csv files.
Using
Win32::ODBC, you can pull your records from the Excel file directly and write
them back out to the format yo
> -Original Message-
> From: steve silvers [mailto:[EMAIL PROTECTED]
> Sent: Thursday, August 07, 2003 1:17 PM
> To: [EMAIL PROTECTED]
> Subject: Calculating number position help
>
>
> I have a text file of numbers like so..
>
> 01|07|08|11|12|13|21|23|28|31|41|44|80 # set 1
> 06|10|
>
> Hi
> I am able to FTP the file to any local directory on 'MY
> Machine'. But the
> application should be such that any user can FTP the file to a fixed
> location on HIS m/c (say C:\Temp. I will make sure that all
> the users have
> this directory on their sys.). Then he should edit it
> -Original Message-
> From: Ismail Mutlu [mailto:[EMAIL PROTECTED]
> Sent: Friday, May 30, 2003 3:51 PM
> To: [EMAIL PROTECTED]
> Subject: Spreadsheet::WriteExcel-> new dies unexpectantly
>
>
> Hello Group,
>
> Following script dies with this error :
>
> Can't open iso.xls. It may b
35 matches
Mail list logo