Saxena, Saurabh wrote:
> Hi
>
> I am trying to get all the files present in a directory using
>
> my $filename="*.txt";
> my @file_list = "";
>
> until (@file_list = $g2_ftp_obj->ls($filename)) (Using FTP object)
>
> But this is listing only file that are "*.txt" not th
>Dear Tim,
> I might be wrong on this.
>I believe that, we can open the file for both read and write
( perl).
>something like,
> open("AA"," +>>philips.txt");
### Using this we >can read/write/a
Hi
I am trying to get all the files present in a directory using
my $filename="*.txt";
my @file_list = "";
until (@file_list = $g2_ftp_obj->ls($filename)) (Using FTP object)
But this is listing only file that are "*.txt" not that are "*.TXT".
Is there any way to m
Dear Tim,
I might be wrong on this.
I believe that, we can open the file for both read and write ( perl).
something like,
open("AA"," +>>philips.txt"); ###
Using this we can read/write/appen
You can't read from a file that is opened for writing. Your script actually crashes
perl on my machine. I'm not exactly sure
what you intended to do there, so I can't offer any suggestions unless you
provide more detail.
Tim
___
Perl-Win32-Users mail
- Original Message -
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, April 24, 2002 4:37 PM
Subject: Tk's messagebox
> It works but It's making a windows that I dont want... I only want
> messagebox..
If I understand you correctly - all you want is the messageBox. i.e.
Try
...
if (-T "dston"){
...
Without the quotes, dston is interpreted as a filehandle.
Tim
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Hi All,
I am just starting on it and kind of overwhelmed with
the amazing capabilities of perl, how ever for now I
have 2 questions :
Q1) while(<>){
$data=$data . $_;
print $data;
print "loop\n"
}
and calling it like this c:\>perl simple.pl data.txt
it should print all
Hi All
I'm fairly new to PERL. I am writing a script that has
opens a file that has two sets of values for which I
need to check for duplicate values , print only a
unique value to another file. I'm running into a
problem that is reproducible in the script below also
and seems to do with Filehandl
I have version 5.6.1 running on win98. The file test
statement doesn't seem to work ( -e -f -T etc.). The
following code doesn't detect the existence of file
dston.
#use POSIX;
($sec, $min, $hr, $mday, $mon, $yr, $wkday, $yrday,
$isdst) = localtime;
system ("dir dston");
if (-T dston){
$offch
Dear All,
I have seen one perl code with the follwing stuff
sub func_name($$$)
{
$a = @_;
}
My question is ,
What is the purpose of
Hello,
Is it possible to get the filename and path for a file
given just a filehandle?
I wrote a manual file-locking module for win95/98
systems and I would like to emulate the interface to
the standard flock for seamless replacement.
Thanks.
Bill
> I have been trying to use Tk's Message Box without success...
Try
Tk::DialogBox - create and manipulate a dialog screen.
use Tk::DialogBox
...
$d = $top->DialogBox(-title => "Title", -buttons => ["OK", "Cancel"]);
$w = $d->add(Widget, args);
...
$button = $d->Show;
-
I have been trying to use Tk's Message Box without success...
use strict 'vars';
use Tk;
# creates a window to work with
my $main = MainWindow->new();
my $rc;
$rc=$main->messageBox(-icon=>'info', -message=>'This is a test message
box.', -title=>'Title', -type=>'Ok');
It works but It's making
Perl provides all the environmental variables in the predefiend
hash %ENV. You can change an environmental variable or add
an enviromental variable by altering the %ENV hash just as you
would alter any other hash. The modified or added value will be
passed on to (inheteted by) any external process
Title: RE: ppm install CGI
I just did a ppm query, didn't see it and jumped the gun. Duh. Sorry gang, it's in there.
> -Original Message-
> From: Johan Lindstrom [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, April 23, 2002 17:45
> To: [EMAIL PROTECTED]
> Subject: Re: ppm install CGI
>
Doh!
Here is the script...
-
#!/usr/bin/perl
use strict;
use warnings;
use Carp;
# this sub directly from Camel 3
sub swrite {
croak "usage: swrite PICTURE ARGS" unless @_;
my $format = shift;
$^A = "";
formline($format, @_);
return $^A;
}
my $width = 80
> I had sent this message a couple of days ago and for some reason the
> whole email came out in one long line, and was sent with an
> attatchment that I did not attatch, so I'm going to try this again. I
> am trying to write a macro using WIN32::OLE in Word that prints lines
> of the form
>
I'm writing a Perl/Tk app where I need to capture the output of a console program.
When I use `command` or a pipe, a cmd window pops up. Is there any way to prevent it?
TIA
Mark Edwards
Compaq Global Services
Customer Solutions and Support Center
Compaq Computer Corporation
301 Rockrimmo
Hi Roger and $Bill,
In a message dated 4/24/02 6:52:45 AM Central Daylight Time, [EMAIL PROTECTED]
writes:
> > Although I notice on some postings to usenet that select *used* to work
for
> > AS Perl, and does for some variant djgp perl. Has any one observed this?
>
> I believe it's still t
20 matches
Mail list logo