"Eric Edwards" <[EMAIL PROTECTED]> wrote:
>> Hello list,
>> I added a -w and -e and both return false.
>> But the file is created and out there.
>> When I change the format to STDOUT it prints the format to the
screec >> just
>> as it should. But it won't write the format to the file because it
[EMAIL PROTECTED] wrote:
> Hello perlers,
>
> I'm trying to send tome information over a TCP Socket, but I have to
> send the length of the package as Hex, and the rest as ASCII. Could
> someone explain me how to do that please? I've converted the length
> to Hex but it always sends everything as
Hello perlers,
I'm trying to send tome information over a TCP Socket, but I have to send
the length of the package as Hex, and the rest as ASCII. Could someone
explain me how to do that please? I've converted the length to Hex but it
always sends everything as ASCII. Here's the code. it's a very s
> According to the docs on CPAN, there's a -multiple option,
> but I can't get it to work.
>
> Let us know if you have any joy.
I've never got that to work. There's a way to do it with Win32::FileOp,
though...
@file = Win32::FileOp::OpenDialog(
-title => "Select File(s) t
Hello list,
I added a -w and -e and both return false.
But the file is created and out there.
When I change the format to STDOUT it prints the format to the screec just
as it should. But it won't write the format to the file because it can't
find the file.
Any suggestions?
Thanks much!
Eric
#!/usr
Hi there,
Is there anyone who can guide me on the usage of the API GetProcAddress to
get the Address of a function in my own PERL code.I think the followinf is
right:
$FunctionHandle=$GetProcAddress->Call($GetModuleHandle->Call("perl.exe"),"function_name");
Please correct if I'm wrong...
Regar
File::Find performs that task quickly and efficiently. You can copy the
example from the POD and you are ready to go.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Dirk Bremer (NISC)
Sent: Friday, March 12, 2004 8:55 AM
To: [EMAIL PROTECTED]
Subject:
I am not interested in File::Find for this particular task, although I am
familiar with its capabilities.
Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters
USA Central Time Zone
636-922-9158 ext. 8652 fax 636-447-4471
[EMAIL PROTECTED]
www.nisc.cc
- Original Message -
From
According to the docs on CPAN, there's a -multiple option, but I can't get it to work.
Let us know if you have any joy.
R.
> -Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Behalf Of
> Dirk Bremer \(NISC\)
> Sent: 12 March 2004 14:55
> To: [EMAIL PROTECTED]
> Sub
Someone recently posted a code example using Win32::GUI to browse for a
folder, ala:
$Dir = GUI::BrowseForFolder(-title => "Win32::GUI::BrowseForFolder test");
Is there a similar method to browse a folder for the files contained within
and to allow the selection of multiple files, returning the
Guys,
When I use getSavefile, if the user selects an existing file name, then a dialog box
pops up saying it exists, and do they want to overwrite it.
However, the way that my script works is that if you choose to write to an existing
file, it appends to that file, rather than overwriting it.
Guys,
I've done a GUI that parses text files into csv files.
When it's finished I place a widget called $done on the gui.
If you press the Go button again, it destroys $done, then starts processing, and
places $done on the gui again when it's finished.
The problem is, I want $done to disappear
Hi,
I am facing some problem related to a
Oracle Tool called "oracletool" available @ www.oracletool.com
Below are the details:
I am using: Windows 2000
ProfessionalActiveState Perl
5.6.1Apache 1.3.22DBI 1.34 DBD-Oracle 1.12 Oracle Enterprise
Edition 9.2
All are successfully instal
Anderson, Mark (Service Delivery) wrote:
> Works perfectly for me... ActiveState 5.6.1 on NT4
>
> #!C:/Activeperl/bin/perl.exe
> use strict;
> use warnings;
> my ($name, $address, $city, $state, $zip);
> format ADDRESSLABEL =
> ===
> | @<< |
> $
Works perfectly for me... ActiveState 5.6.1 on NT4
#!C:/Activeperl/bin/perl.exe
use strict;
use warnings;
my ($name, $address, $city, $state, $zip);
format ADDRESSLABEL =
===
| @<< |
$name
| @<< |
$address
| @<
15 matches
Mail list logo