[EMAIL PROTECTED] wrote:
> To the Point (the question): If I install ActiveState
> Perl onto a non-internet connected computer, can I
> create an HTML file (client side) that has a form that
> submits to a CGI file (client side - same computer)
> and uses that data to create some MS word document
"Daniel Gross" <[EMAIL PROTECTED]> writes:
> I running into problems again: This time I'd like to fill a hash
> with arrays, however, the following push command generates a
> syntax error. Any idea why
> My %dirHash = ();
> foreach my $item(@dirArray) {
> $prefix = substr($item, 0,4);
>
[EMAIL PROTECTED] wrote:
> Is it possible to use the require command from a perl script on one
> server, to access a library located on a different server??
> For example:
> require "http://www.dokos-gr.net/RWAPSoft/cgi-bin/my_lib.pl";
Yes and no. Or maybe no and yes. Or maybe just no. As was n
"Krishna, Hari" <[EMAIL PROTECTED]> wrote:
> I have written a perl program that downloads the files (basically
> ftp in a batch program) from the unix systems to windows. These files
> contain the ping information to various unix systems that we use. The
> program then calculates the uptime and d
"Mundell, R. \(Ronald\)" <[EMAIL PROTECTED]> wrote:
> I am busy writing a script that will determine the status of an
application.
> I also need to determine the amount of memory used by such an
application.
> If anyone knows how to do this within perl please help. This solution
needs
> to be pla
"LViale - TiscaliNet" <[EMAIL PROTECTED]> wrote:
> Does someone know how to get from registry the exact version of MS
> Win 2k (Professional, Server, Advanced Server, ...).
The WMI Win32_OperatingSystem object has attribute "Caption" which says "
Microsoft Windows 2000 Professional" on my deskto
Glenn Linderman <[EMAIL PROTECTED]> wrote:
> And my "missing feature" PPM rant is that it would be nice to be
> able to issue PPM commands to prepare a CD containing a collection
> of modules and their dependencies to take to an offline machine
> (there are places where there just isn't local acc
[EMAIL PROTECTED]
> Hi,
> I have to debug my scripts. But i don't know a free Perl debugger.
> Can you recommand me one.
> Thank you
> --
> MESSAGE PROMOTIONNEL
> HOROSCOPE
> Travail, argent, rencontres... Les astres vous répo
"Jeff DuVall" <[EMAIL PROTECTED]>
> Is there an easy way to search a directory tree for path/filename
combinations of
> a particular length? I'm troubleshooting a issue with some software, and
want to
> rule out that the possibility of having path/filename combinations of
>260
> characters.
_TH
"theatrale" <[EMAIL PROTECTED]>
> in all my perl programs, there is a line to include my own libray :
> use lib $ENV{'PTI_CGI_HOME'};
> I wonder how to declare "PTI_CGI_HOME" and where (in apache ?).
This is not an Apache mailing list. Further, you did not provide the
version of Apache you are
Cameron Dorey <[EMAIL PROTECTED]> wrote:
> Mangesh wrote:
> > I am trying to use one regular expression to extract search result from
> > Google.
> >
> >
> >
> > In PERL script this works fine but in VB.NET this does not work. any
> > suggestions??
> >
> [VB snipped]
> No suggestions but the o
"sadanand limaye" <[EMAIL PROTECTED]> wrote:
> I have written a perl script to find the program is running or not.
> On Unix, I can use to test mytest binary is running
> $isprocactive = `ps -ef | grep mytest | grep -v grep | grep -c mytest`;
> If the process mytest is running then $isprocactiv
Lee Goddard <[EMAIL PROTECTED]> wrote:
> Here's a funny thing: I'm getting the runtime error "Modification of a
> read-only value attempted" when $_ is set to any value (including undef).
> This is the only $_ in the scope, and it doesn't matter where in the
block
> I put it.
> First thing in a
"Mundell, R. \(Ronald\)" <[EMAIL PROTECTED]> wrote:
> How do one set an Environment variable out of a perl script, let say
PATH?
$ENV{PATH} =
But this only works for processes spawned by the Perl script that does the
setting. Search the archives of the os-specific mailing lists for
OS-specific
Lee Clemmer <[EMAIL PROTECTED]> wrote:
> s/$search/$newstr/i
You might want to modify this to
s/$search/$newstr/igo
The "o" promises Perl you will never change the $search string. Perl will
then put it through the regular expression compiler the first time it's
encountered, and you _should_ pe
I assume IsObject is a method that returns TRUE if the given object is of
the given class, and FALSE otherwise. If this is the case, the 'canonical'
way to do it is to use UNIVERSAL::isa. See the 'perlobj' documentation for
details. Here's some (working, this time!) sample code:
use strict;
use w
The code:
while (<>) {
$day = '';
print "Before: $_";
s/(Monday|Tuesday|Wednesday|Thursday|Friday|
Saturday|Sunday)'s(\s+Games)?//x and $day = $1;
print "After: $_";
print "Day = '$day'\n";
}
The test:
C:\>perl trw.tmp
Yesterday's Games were boring
Before: Yesterd
Burak Gürsoy <[EMAIL PROTECTED]> wrote:
> umm... did you read my message?
> wantarray is 'exactly' what you want
Second the motion. In fact, Last night I spent a little time writing a
rebuttal, but then I tried it, and you're exactly right. I figured this
would be the last word, but should have
[EMAIL PROTECTED] wrote:
> The $expletive produced by Excel claiming to be HTML
> is just awful (and Office 2000 is even worse)
You got that right. When HTMLizing "Put the CD in the CD drive" with
Word2K, we got
"Put the CD in the CD drive."
> If you do save from Excel, make sure you run the
"optique" <[EMAIL PROTECTED]> wrote:
> forgive my poor english, :), I come form beijing, china.
It is better than my Chinese!
> my question is:
> @B = (1,2,3,4,5,6);
> @A = (3,6);
> and I want to remove 3 and 6 from @B, after that the @B
> will be (1,2,4,5).
> but, I don't want to use "foreach
All,
My apologies to the list for the previous empty note.
Starting about a day ago, everything I post to this list gets the following
reply from System Attendant <[EMAIL PROTECTED]>:
Trend SMEX Content Filter has detected sensitive content.
Place = [EMAIL PROTECTED]; ;
Sender = Th
This communication is for use by the intended recipient and contains
information that may be privileged, confidential or copyrighted under
applicable law. If you are not the intended recipient, you are hereby
formally notified that any use, copying or distribution of this e-mail,
in whole or in
No problems with:
Norton Antivirus Corporate 7.60.926
ActivePerl 633
Windows 2000 SP2 (5.00.2195)
Tom Wyant
This communication is for use by the intended recipient and contains
information that may be privileged, confidential or copyrighted under
applicable law. If you are not the intended
Carter,
I'm with Johan Lindstrom - bind variables are the way to go. If you're
unfamiliar with them, they're a little strange at first. The following is
your script cold-coded to use bind variables and placeholders.
# Create the Insert
my $SQL = <<"-- sql end --";
INSERT INTO scmrequests (Status
Phil -
You might want to look at XML::Simple. I get the impression XML::Parser is
the foundation of a _lot_ of XML code (including XML::Simple). XML::Simple
will load the XML into a data structure that looks a lot more like what you
probably want to massage with Perl. It goes to considerable leng
[EMAIL PROTECTED] wrote:
> The output looks like this:
> date1 => 2002101714:59:00
> date2 => 2002102510:47:56
> date3 => +0:0:1:0:19:48:56
> There's defintely 7+ days between these two dates, it shows 0 days,
> 19 hours, 48 minutes, 56 seconds.
Actually, it shows 1 week, 0 days, 19 hours, 48
Burak -
Unless, of course, the user opened first! :-)
Perverse example:
C:\>perl
print "Hello, sailor!\n";
__END__
Hello, sailor!
C:\>perl
while () {print "Data> $_"}
__END__
The bustard's a genial fowl
Data> The bustard's a genial fowl
with minimal reason to growl.
Data> with minimal reason
Hari -
You've got me. It seems to me if Win32::AdminMisc is installed on your
server _and_ your browser has access to it, this shouldn't happen. But I've
seen it come by on the mailing list. You might want to root around in the
archives and see what comes up.
Tom
"Krishna, Hari" <[EMAIL PRO
John Drabinowicz <[EMAIL PROTECTED]> wrote:
> I just got the O'Reilly "Learning Perl on Win32 Systems" book and
> have a question about using the directory/file structure.
> This book says that I can walk the directory as shown is example 1, >
[using <> globbing] but I have been using example 2
"Scott Campbell" <[EMAIL PROTECTED]> wrote:
> I have looked everywhere to find an example of how to call a
> "method" in WMI with perl, and have been unsuccessful.
> Does anyone know if it can be done, and if so, have an example?
Yes, it can be done. The following script lists all process IDs,
[EMAIL PROTECTED] wrote:
> I'm trying to get Information about a spezific table in an Oracle
> with the command
> 'describe table_name; '
> This command works within SQL-PLus and other Tools but I get the
> error message: "Ora-00900: invalid SQL statement" when I use it
> within a perl-script
"Adam Ingerman" <[EMAIL PROTECTED]> wrote:
> [[EMAIL PROTECTED] wrote:]
>> do you know a possibility to set the actual directory inside a Perl
>> script ("chdir my_dir;") to get it changed in the command shell
>> outside the script?
> easiest way, tell the shell to do it for you. if you're on
"Warkentin, Brad" <[EMAIL PROTECTED]> wrote:
> Thomas R Wyant_III [mailto:[EMAIL PROTECTED]]
> postulates:
>> Because of the "text" mode translation, DOSish perls have
>> limitations in using "seek" and "tell" on a file acces
Paul Flint <[EMAIL PROTECTED]> wrote:
> I'm getting incorrect results from recipe 8.8 in the Perl Cookbook.
> I'm building an index of offset positions for lines in a file (3
> MB), which I'm supposed to be able to use to access any line in that
> file.
> I use Code A to build the index. (take
M
Sent by:[EMAIL PROTECTED]
To:<[EMAIL PROTECTED]>
cc:
Subject:RE: NET::Telnet
Thanks.
But the what should be used as prompt?
-Original Message-----
From: Thomas R Wyant_III [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, September 17, 2002 7:01 PM
To: [EMAIL PROTECTED]
Subject: R
Beckett Richard-qswi266 <[EMAIL PROTECTED]> wrote:
> Is there something I can insert into the script to stop the parser
> from checking the rest of it, before execution?
As Adrian Stovall, wrote, __END__ is useful in this duty, and in fact I
have so used it.
Sometimes, though, the part you wan
Eckart -
Aldo Calpini's Win32::Shortcut will both create and manipulate shortcuts.
It comes with ActivePerl, but unfortunately, the documentation apparantly
gets lost somewhere between him and ActiveState's distribution. You can get
it by downloading the current Win32::Shortcut from http://dada.
Ron Grabowski <[EMAIL PROTECTED]> wrote:
> my $regex = join '|', 'value_garbage1',
> 'value_garbage2',
> 'value_garbage3';
> next if /$regex/;
You might want to say "next if /$regex/o" to prevent Perl from compiling
every time. If you're Perl 5.6, yo
All -
While investigating Randy Kobes' PPM::Make package, I discovered that the
copy of Archive-Zip.zip
http://www.activestate.com/PPMPackages/zips/6xx-builds-only/ supports only
sun4-solaris-thread-multi and i686-linux-thread-multi. No Win32. If I use
PPM to acquire the module directly (i.e.: P
Dovalle Yankelovich <[EMAIL PROTECTED]> wrote:
> I need to take some data from txt file and im looking for a
> string within the text.
> here part of the text:
> tionDwsRx: Total allocated bytes (downstream) = 0, bits = 2,
> I need the value after the first '='
What's wrong with
my ($bytes,
Ember Normand <[EMAIL PROTECTED]> wrote:
> It seems that Active State has not implemented getppid.
> Any hints on how I can get the PID that is in the Windows Task
> Manager?
If you have WMI available, you can get it that way; see Dave Roth's "Win32
Perl Scripting" for more information.
I've b
Adam,
Under Windows 2000 (and possibly other Win* operating systems), see
$ENV{USERPROFILE}. If you need a complete pathname:
C:\>perl -MFile::Spec -e "print File::Spec->catfile ($ENV{USERPROFILE}, 'My
Documents')"
C:\Documents and Settings\wyant\My Documents
Beware of the space if you intend
_I_ think you need
@nums = split '\s+', $nums;
If you do
push @nums, qw{$nums};
the list ends up containing ('$nums'), because qw is _not_
"double-quotish".
Tom Wyant
<[EMAIL PROTECTED]>@listserv.ActiveState.com on 05/16/2002 12:14:51 PM
Sent by:[EMAIL PROTECTED]
To:[EMAIL PRO
Yes, but _I_ didn't have to write any of it.
If we're going to talk about ALL the code necessary to run
C:\>perl -pe "" newscript.pl
I feel constrained to point out that I executed not only Perl itself but
Windows. A _serious_ attempt to reduce the amount of code needed to do the
job would pro
"Mary J Blige" <[EMAIL PROTECTED]> wrote:
> Does anybody know the good algorithm [snipped code would be better
> ;-)] that can produce all sequences of a string of numbers??
Sounds like you're talking about permutations.
I searched CPAN (http://search.cpan.org/) with the word "permute" and cam
I had a wonderful example, but this message is too small to contain it.
Rather than asking people to post again, have you tried the mailing list
archive?
Tom Wyant
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.Ac
"Tillman, James" <[EMAIL PROTECTED]> wrote:
> Is anyone else less than thrilled regarding this new CHM version of
> the help? I fail to see the benefit when it doesn't add newly
> installed modules to the help. With the plain HTML help we used to
> have in ActivePerl, new modules got added to
Balam,
You say your code is not working, but you don't say what's wrong.
You could try Date::Manip. It may be overkill, of course, and you don't get
a Perl date out of Parse_Date; you still need to run it through Unix_Date
with the %s format qualifier. And I always seem to have to hold my tongu
All,
The problem of how to get info on another process comes up here from time
to time. I had my own incentive to solve the problem (I needed a full path
name, and couldn't get it from anywhere I had access to) so with a little
help from my friends (including, but NOT limited to, Dave Roth, Jend
All,
Periodically there's traffic on this list about how to get information
about another NT process. I have needed some things along this line,
including things I can't figure out how to get from Win32::PerfLib (the
full pathname of the executable is what I was really interested in).
So I have
"Andrew Wax" <[EMAIL PROTECTED]> wrote:
> I have a perl script that runs fine when I run it standalone. It
> basically reads a file from a network drive and writes output to
> a network drive. When I call this from a the web page it fails.
Are you running the Apache service under a username t
[EMAIL PROTECTED] wrote:
> If the script is started using "perl test2.pl a b c" it passes
> args correctly but not when called bare at a command prompt, ie
> "test2.pl a b c"
Build 630 works for me under Win2K SP2. The symptoms say that the .PL file
association is incorrect. From a folder w
See response to "Win32::OLE in Windows NT only"
Tom Wyant
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Why do I get "Can't call method on an undefined value?"
---
Because you're trying to call a method on an undefined value. This
generally means that you did something like
$object = Class->new ();
$object->method ();
and Class->new failed. The
"karthikeyan" <[EMAIL PROTECTED]> wrote:
> I have allready sent unsubscribe message before.
This is one of those times when I think this mailing list needs a FAQ. I
actually started one not too long ago, but most of the entries were "read
the documentation," so I desisted. The following is from
<[EMAIL PROTECTED]> wrote:
> Problem 1:
> if/elsif fails. The first if stmt evaluates to false, but then the
> subsequent elsif stmts are never tested, ...
C:\1Tmp>type foo.pl
if (0) {
print "FALSE is TRUE!\n";
}
elsif {
print "FALSE is FALSE.\n";
}
C:\1Tmp>perl foo.pl
sy
<[EMAIL PROTECTED]> wrote:
> I'm looking for a simple one or two liner snippet
> that i can call to get the current directory of the script
use Cwd;
Example:
C:\1Tmp>perl -MCwd -e "print getcwd"
C:/1Tmp
Tom Wyant
___
Perl-Win32-Users mailing l
All,
I had a note from David Deline that supplied the missing piece. The
corrected scripts are appended. The changes are:
The script that generates the output needs to set $| = 1. This gets you
automatic flushing of the output data. This means, by the way, that unless
you can coerce the program
Ah-Hah!
It's all characters. "PIC XX" means a two-byte field, "PIC X(70)" means a
70-byte field. All you need is something like
($l_name, $f_name, $id1_num ...) = unpack 'A35A30A10...'
where the elipsis ("...") means "you fill in the rest."
Now figuring out what file to read and how to read
[EMAIL PROTECTED] wrote:
> It seems that the ++ [in a regular expression] causes
> problems (which I understand). Is there a way to tell
> Perl to handle the ++ as a string rather than an operator?
Yes.
Oh. You want to know how?
If you read "perlre" in the documentation which
"Morse, Richard E." <[EMAIL PROTECTED]>
> Orcish manouver?
Not sure where I got that name for it. It's NOT in ActivePerl's HTML help
(and I _did_ find it and install it over top of 630, since I add modules to
ActiveState's kit, and I wanted the help for them available).
It's a cacheing techni
"Tillman, James" <[EMAIL PROTECTED]> wrote:
> use Win32::OLE;
> my $ServObj = Win32::OLE::GetObject("IIS://MYWEBSERVER/w3svc/1/Root");
Interesting. With ActivePerl 630,
use Win32::OLE;
my $ServObj = Win32::OLE::GetObject("IIS://MYWEBSERVER/w3svc/1/Root") or
die Win32::OLE->LastError ();
g
<[EMAIL PROTECTED]> wrote
> Do you think we can impose upon our Original Poster to run some
> benchmarking on his live data?
Honestly, no. We could try, but since we're just mailing addresses to each
other, I doubt we have anything to impose _with_. But if he wishes to do it
and publish, I
"John Draper" <[EMAIL PROTECTED]> wrote:
> I would like to sort @A_of_H based on 'SIZE', i.e.,
> A_of_H[$i]{'SIZE'} from largest to smallest.
sort {$b->{SIZE} <=> $a->{SIZE}} @A_of_H
is, strictly speaking, the answer to your question. However, I have no idea
what will happen if two files hav
"thiyag" <[EMAIL PROTECTED]>
> i have a file with perl statments,I want them to be access few line
> (depends dynamically) in my programe ,
> can anyone suggest me how to go about with it...! i tried reading the
> file line by line extracting the needed line's into an array and th
Abner, Daniel" <[EMAIL PROTECTED]> wrote:
> What's an efficient way of splitting the elements of an array
> globally? For instance, let say an array consists of the
> following two elements:
> Bob:Jones
> Mary:Parker
> Let's say I'd like to cut each element of the array down to
> the string pr
66 matches
Mail list logo
