> -Original Message-
> From: Mariusz [mailto:[EMAIL PROTECTED]]
> Sent: 09 September 2002 05:59
> To: perl
> Subject: perl and my DB...
>
> (Can I submit the record via DBI and read the primary key
> "ID" within the same script. Other words, can I send the last
> name creating a new
Hi,
How to change drives.
For eg if i am in c: right now i want to move to M:
Am i doing the right thing :
chdir " M:\\test_merge1" ;
Regards
Javeed
On Mon, 9 Sep 2002, Javeed SAR wrote:
> Hi,
>
> How to change drives.
>
> For eg if i am in c: right now i want to move to M:
>
> Am i doing the right thing :
>
> chdir " M:\\test_merge1" ;
You can check this yourself
use Cwd;
print cwd; # This should print your current working dir
--
To
The Perl Black Book is the best book I've seen so far (I've been working
with Perl for about 2 years).
I had a lot of trouble with Learning Perl, in fact I never managed to learn
much from it! I felt like the book assumed too high a level of
understanding of Perl to be useful to a real novice (
Hi,
I need to read Paradox database on Linux system.
Is there a module that enables Paradox database reading?
thanks for help.
ladislav
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
perldoc -f chdir
__
Do You Yahoo!?
Everything you'll ever need on one web page
from News and Sport to Email and Music Charts
http://uk.my.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
perldoc -f chdir
__
Do You Yahoo!?
Everything you'll ever need on one web page
from News and Sport to Email and Music Charts
http://uk.my.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi,
I printed the statement:
print cwd;
it's in right path, but the program comes out in c:\, i want the cursor to
be in m:\test_merge1, in this dir i am executing a command, which is not
executing?
chdir " M:\\test_merge1" ;
@cmd=`cleartool setcs -current`;
Regards
Javeed
-Original Messa
On Mon, 9 Sep 2002, Javeed SAR wrote:
> Hi,
>
> I printed the statement:
> print cwd;
> it's in right path, but the program comes out in c:\, i want the cursor to
> be in m:\test_merge1, in this dir i am executing a command, which is not
> executing?
The chdir inside your perl program will not
Mark Goland wrote:
>
> This will do mandetory locking { which can also be done with "chmod +l
> filename"}. If someone can rewrite this into perl , that would be great.
>
> /*
>write by Mark Goland use and enjoy keep the tag
>[EMAIL PROTECTED]
> */
>
> #include
> #include
> int main(
Hey you need use perl to change a directory
If you really want to cd thru a script why dont you write a batch file
Javeed Sar wrote:
> Hi,
>
> I printed the statement:
> print cwd;
> it's in right path, but the program comes out in c:\, i want the cursor to
> be in m:\test_merge1, in this dir i
> -Original Message-
> From: Javeed SAR [mailto:[EMAIL PROTECTED]]
> Sent: 09 September 2002 11:25
> To: Sudarshan Raghavan; Perl beginners
> Subject: RE: change directories
>
>
> Hi,
>
> I printed the statement:
> print cwd;
> it's in right path, but the program comes out in c:\, i wa
How would I remove all the space and replace them with commas, but where
there is more than one space in a row, only replace those with one comma? In
other words make the follwing file comma delimited and strip out everything
preceding the date?
=== My crack at the script ===
use strict;
while(
On Sep 9, Mike Singleton said:
>How would I remove all the space and replace them with commas, but where
>there is more than one space in a row, only replace those with one comma? In
>other words make the follwing file comma delimited and strip out everything
>preceding the date?
To turn 1 or mo
Weekly posting statistics for perl.beginners - week 36 of 2002.
>From Monday 2002-09-02 to Sunday 2002-09-08 there were
344 articles posted (14565 lines) by 107 authors, giving an average
3.21 articles per author, and an average article length of 42 lpa.
The average number of articles per day w
for once I am not on the top 10 since I first subscribed to the list. :)
> -Original Message-
> From: Felix Geerinckx [mailto:[EMAIL PROTECTED]]
> Sent: Monday, September 09, 2002 12:59 PM
> To: [EMAIL PROTECTED]
> Subject: Weekly posting statistics - 36/2002
>
>
> Weekly posting statis
Tony wrote:
>
> Seems that glob needs to be defined manually with perlcc but with the perl
> interpreter glob is already defined.
>
> If anyone has additional information to educate me a little more on this
> 'glob' issue I'd appreciate it.
>
> Hope this helps someone.
>
> Tony
the reason is
hello list
i am trying to print the output of a parsing script to a file- the way it
is right now, the print commands are within a foreach loop, and it prints
to the screen. in order to get the entire output into a file, i'm using a
simple set of commands like so:
foreach my $key (keys %a
I think that I have bit off more than I can chew here
Error: The process cannot access the file because it is being used by
another process.
== Script ==
#!/usr/bin/perl
###
#
# Copyright (C) 1998 by Syncsort, Inc.
#
Ebaad Ahmed wrote:
> How can I install GD librariies on U10 solaris 7 machine to run the graph
> module.
>
> Need help really bad.
>
> Regards,
> Ebaad.
if you donwload GD from CPAN, untar it, there will be a README(or INSTALL)
file that tells you exactly how to install GD. you wi
You want the open on the outside of the loop. You are using > on
the open, which basically gives you a new clean file each time. You could
use >> for appending the data, but there is no reason to open the file
repeatedly.
Wags ;)
-Original Message-
From: Nandita Mullapudi [mail
You need to either a) open your file before the foreach loop, or b) open the
file in append mode. When you use this line, "open(OUT,
'>outputfile.txt')", Perl opens the file and removes the contents. It
truncates the file to 0 bytes. This is because you are using the > operator
instead of the
You're real close to what you need here. You're just reopening (and
clearing) that file every time through the for loop. Move that open
statement to above the loop and everything will start working fine.
Good luck.
James
On Monday, September 9, 2002, at 11:49 AM, Nandita Mullapudi wrote:
Alexandre Enkerli wrote:
> Hello all,
> This one is probably very easy for most of you and it would help me a
> great deal if someone could tell me how to do it. I know there's a
> bunch of tutorials, perldocs and manuals out there, but I'm getting
> confused.
>
> I receive files with the follow
James Edward Gray II wrote:
>> open (OUT, '>outputfile.txt') or die "couldn't";
>> print OUT "$key\n\n", $alignments{$key},
>> "\nXXX\n"
the reason is in these 2 lines(especially the open() thingy). whenever you
ask Perl to open something for writing, Perl turncate t
Mike Singleton wrote:
> I think that I have bit off more than I can chew here
>
> Error: The process cannot access the file because it is being used by
> another process.
>
> open (OUTF,">$OUT_TEMP") || die "Cannot open output file $!";
> my @files = glob('3*.log');
> $grepexpr = "egrep
> \
Hi David,
I ran the command for GD install and it seemed working and it asked me for
certain packages that need to be installed and after every thing was said
and done it started installing and gave me the following errorm if it is
familiar or has a fix please let me know.
Checking if your kit i
Hi:)
I want to be able to track the user as he goes from one pae to another. I
heard that sessionID are used for that purpose. I was trying to find info on
the net about creating a sessionID with perl and didn't find any articles
for biginners. Could anyone pls tell me how to create them or whe
Ebaad Ahmed wrote:
> Hi David,
>
> I ran the command for GD install and it seemed working and it asked me for
> certain packages that need to be installed and after every thing was said
> and done it started installing and gave me the following errorm if it is
> familiar or has a fix please let
http://www.perldoc.com/perl5.6.1/lib/CGI.html
should get you what you need..
-G
On Mon, 09 Sep 2002 19:18:43 +
Mariusz K <[EMAIL PROTECTED]> wrote:
> Hi:)
> I want to be able to track the user as he goes from one pae to another. I
> heard that sessionID are used for that purpose. I was t
> -Original Message-
> From: Mariusz K [mailto:[EMAIL PROTECTED]]
> Sent: Monday, September 09, 2002 3:19 PM
> To: [EMAIL PROTECTED]
> Subject: session id
>
>
> Hi:)
> I want to be able to track the user as he goes from one pae
> to another. I
> heard that sessionID are used for that p
On Mon, Sep 09, 2002 at 11:24:01AM -0700, david wrote:
> also, the way you create your temp file is not reliable. there are better
> ways to do what you need. you might want to goto cpan and search for a
> module(i can never remember it's name!) that suits your need.
You're probably thinking of
Mike Singleton wrote:
>
> How would I remove all the space and replace them with commas, but where
> there is more than one space in a row, only replace those with one comma? In
> other words make the follwing file comma delimited and strip out everything
> preceding the date?
>
> === My crack a
hi,
I recently subscribed to this group. I was wondering if there was a way to access
it the same way as google groups wherein you can access mails from previous days too
or is emails in the mailbox the only way?
Thanks,
-Sheena.
-
Do You Yahoo!?
Yah
Hello all:
I need to produce a list Windows2k hosts on our network. It would seem that I could
obtain the information
from the domain controllers I looked at Win32::NetResource but can't figure out how
to get the node name.
Any thoughts ?
-thanks
-mark
-
Mark Richmond
There is an archive at http:[EMAIL PROTECTED]/,
and google groups has archives from perl.beginners, which is a newsgroup
which posts the contents from this mailing list.
-Original Message-
From: sheena sidhu [mailto:[EMAIL PROTECTED]]
Sent: Monday, September 09, 2002 1:59 PM
To: [EMAIL P
Greetings.
I wish to obtain the time and date of a file.
How do i do this in perl ?
There is probably a module out there to do this but is it possible to modify the date
and time format of the output of whatever method is available for getting the time and
date modified for a file ?
thanx
Friends:
I have an outerloop with a list and so do I have an
inner loop with another list.
$_ variable points to list in the outer-loop or
inner-loop depending upon the scope. I prefer to not
use aliases. In such a case, when I am in the scope of
inner loop, can I access the looping variable on
Friends:
I have an outerloop with a list and so do I have an
inner loop with another list.
$_ variable points to list in the outer-loop or
inner-loop depending upon the scope. I prefer to not
use aliases. In such a case, when I am in the scope of
inner loop, can I access the looping variable on
As a follow up: Win32::NodeName() produces the local NodeName I need
a list of all the nodes. The hunt continues
> -Original Message-
> From: Mark Richmond
> Sent: Monday, September 09, 2002 5:10 PM
> To: [EMAIL PROTECTED]
> Subject: How to find all active windows hosts on a network
>
You can't, exactly. You have just overwritten $_ with the second loop. The
only way you COULD do this is maybe by declaring $_ with local() somehow? I
don't know. Even if you could figure out how to do that, however, you would
be doing the same thing as creating a new variable, only you will
Are you saying that you want to get all Windows hosts on the network, or are
you specifically trying to get the number of hosts that have Windows 2000
installed?
-Original Message-
From: Mark Richmond [mailto:[EMAIL PROTECTED]]
Sent: Monday, September 09, 2002 2:31 PM
To: Mark Richmond;
If you are trying to find out which ones are Win2k, you can iterate over the
list of computers and check the registry like so:
use Win32::TieRegistry(Delimiter => "/");
$verRoot =
$Registry->{"//$client/HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Windows
NT/CurrentVersion/"};
Note: forwarded message attached.
__
Do You Yahoo!?
Yahoo! Finance - Get real-time stock quotes
http://finance.yahoo.com
--- Begin Message ---
Tim -- Thanks for your rejoinder.
Mostly, I do use 'aliased' variables within nested
loops. However, t
On Friday, Aug 9, 2002, at 09:13 US/Pacific, Quincy Ntuli wrote:
> Greetings.
>
> I wish to obtain the time and date of a file.
>
> How do i do this in perl ?
perldoc -f stat
ciao
drieux
---
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
>
>
> Are you saying that you want to get all Windows hosts on the
> network, or are you specifically trying to get the number of hosts that have
> Windows 2000 installed?
Good question never thought about. In this case I don't care what OS is running
I just need to find them all and copies
So the question is how do generate $client
-mark
>
>
> If you are trying to find out which ones are Win2k, you can
> iterate over the
> list of computers and check the registry like so:
>
> use Win32::TieRegistry(Delimiter => "/");
>
> $verRoot =
> $Registry->{"//$clie
On Monday, Sep 9, 2002, at 12:16 US/Pacific, Ebaad Ahmed wrote:
[..]
> Checking if your kit is complete...
> Looks good
> Note (probably harmless): No library found for -lfreetype
> Note (probably harmless): No library found for -ljpeg
> Writing Makefile for GD
[..]
you may want to check the doc
On Friday, Sep 6, 2002, at 23:26 US/Pacific, pelp wrote:
>
> my $change_on = "/FChangeBar Yes/";
> my $change_off = "/FChangeBar No/";
>
>
> $FILE -> open(">test.mif") or die "can't open file";
>
> while ($FILE)
> {
>if ($change_on)
>{
> s/$change_on/$change_off/;
given that you ha
I ran this one-liner, and it did return all the
Windows NT/2000/Servers/Workstations attached to my
domain/workgroup.
C:\>perl -e "use Win32::NetAdmin; my($serverRef) = {};
Win32::NetAdmin::GetServers('', 'MYDOMAINNAME',
SV_TYPE_SERVER, $serverRef); while(my($key, $val) =
each %{$serverRef}){prin
Hi David,
I got this error when ran the patch_gd.pl, looks like its looking for a
patch file.
# perl patch_gd.pl
patch: Invalid options.
patch: Usage: patch [-blNR] [-c|-e|-n] [-d dir] [-D define] [-i
patchfile]\
[-o outfile] [-p num] [-r rejectfile] [file]
This script requires G
Oh, in that case, you can use either Win32::NetAdmin::GetServers() or
Win32::AdminMisc::GetMachines(). Personally, I would do something like
this:
###
use strict;
use warnings;
use Net::Ping;
use Win32::AdminMisc;
my $p = Net::Ping->new('icmp',2);
my @clients = ();
Win32::Adm
I have the GD installed as a package from sunfreeware.com so it does not
have a download directory.
but the dir it created in /home/imaging/.cpan//build/GD-2.01 has the
patch_gd.pl file and I ran it according to David but it seems like its
looking for a real patch file to patch it with.
Regards,
Thanks ALL for the quick help! i realised my mistake, "open" shd be
outside the loop..
:) :) (scripts that work, very pleasing!)
nandita
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
On Fri, Aug 09, 2002 at 06:13:41PM +0200, Quincy Ntuli wrote:
> Greetings.
>
> I wish to obtain the time and date of a file.
>
> How do i do this in perl ?
perldoc -f stat
perldoc -f -X
> There is probably a module out there to do this but is it possible to
> modify the date and time format o
On Monday, Sep 9, 2002, at 15:16 US/Pacific, Ebaad Ahmed wrote:
[..]
> I have the GD installed as a package from sunfreeware.com so it does
> not
> have a download directory.
> but the dir it created in /home/imaging/.cpan//build/GD-2.01 has the
> patch_gd.pl file and I ran it according to David
Thanks to everyone for the help
-mark
-
Mark Richmond <[EMAIL PROTECTED]>
Airvana Inc.
25 Industrial Ave.
Chelmsford, MA 01824
Voice: 978-250-2669
Fax: 978-250-3910
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi,
Since I am currently learning Perl, I was wondering if there are any links that the
community is aware of that has some good exercises to try ones hands on?
Thanks,
-
Do You Yahoo!?
Yahoo! Finance - Get real-time stock quotes
Ebaad Ahmed wrote:
> Hi David,
>
> I got this error when ran the patch_gd.pl, looks like its looking for a
> patch file.
>
> # perl patch_gd.pl
> patch: Invalid options.
> patch: Usage: patch [-blNR] [-c|-e|-n] [-d dir] [-D define] [-i
> patchfile]\
> [-o outfile] [-p num] [-r r
On Mon, Sep 09, 2002 at 02:29:24PM -0700, RTO RTO wrote:
> $_ variable points to list in the outer-loop or
> inner-loop depending upon the scope. I prefer to not
> use aliases. In such a case, when I am in the scope of
> inner loop, can I access the looping variable on the
> outer without using an
Sheena Sidhu wrote:
>
> Hi,
>
>Since I am currently learning Perl, I was wondering if there are any
>links that the community is aware of that has some good exercises to
>try ones hands on?
>
> Thanks,
i don't know such a web site but Perl has a faq where there are many many
begi
On Mon, Sep 09, 2002 at 03:06:06PM -0700, drieux wrote:
>
> On Friday, Sep 6, 2002, at 23:26 US/Pacific, pelp wrote:
> >my $change_on = "/FChangeBar Yes/";
> >my $change_off = "/FChangeBar No/";
[snip]
> > s/$change_on/$change_off/;
>
> given that you have the "/" elements in the variables,
Michael -- As I had earlier posited, it was just out of curiosity and the question was
more in tune with academic curiosity rather than pragmatic correctiveness.
I always used to have "named iterators", but when I was programming without them
today, this question came up to my mind instantaneou
Hi All,
I want to write a script which will first check to see if an earlier
invocation of itself is running - or rather a given program which it in turn
calls is running. Anyone know how to get a list of process on a windows
machine? Is there an internal perl way to get this info?
Also, I've
Hi All
Today I was trying to do some work with perl and needed to use a
function that would trim leading or trailing spaces from a string.
Looked on the web and found basicaly perl uses either chop or chomp each
with their own features.
When I tried to apply it to my $var it either return
On Monday, Sep 9, 2002, at 16:56 US/Pacific, HENRY,MARK
(HP-Roseville,ex1) wrote:
[..]
> Also, I've had variable success with the windows task scheduler to run
> scripts frequently - has anyone any experience with using the
> scheduler vs.
> a long sleep period loop type situation and vice vers
Dizzy74 wrote:
>
> open(FILE,"F:\\test_db\\Admin\\MINIHI\\DEF\\prog_list.txt"|| die "cant
> open file") ;
> chomp(@tblname = );
> open (outfile, ">F:\\test_db\\Admin\\MINIHI\\DEF\\INSERTprog_list.sql"||
> die "cant open file") ;
> foreach $progid (@tblname) {
>
> $progid =~ s/\s+$
Dizzy74 wrote:
>
> Hi All
Hello,
> Today I was trying to do some work with perl and needed to use a
> function that would trim leading or trailing spaces from a string.
perldoc -q "blank space"
Found in /usr/lib/perl5/5.6.0/pod/perlfaq4.pod
How do I strip blank space from the begi
David wrote:
>
> to trim spaces, try:
>
> $line ="\t\tabcd\t \t\n";
> $line =~ /^\s+//;
$line =~ s/^\s+//;
> $line =~ /\s+$//; #-- also remove \n
$line =~ s/\s+$//;
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-ma
On Mon, Sep 09, 2002 at 08:04:24PM -0500, dizzy74 wrote:
[snip]
> I did perldoc -q trim and nothing. Of course chop and chomp were there
> but diddnt seem to work in a pinch (or I couldnt understand how to apply
> the function in my case.
The FAQ entry you're looking for is perldoc -q 'strip
John W. Krahn wrote:
>> $line =~ /^\s+//;
>
>> $line =~ s/^\s+//;
even after looking at your reply for 20 seconds, i still didn't see the
differences... :-) how stupid i am? thanks for spot that.
david
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROT
Thanx John, I have not tested it yet, but it looks right...will give it a
try 2nite.
Mark
- Original Message -
From: "John W. Krahn" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, September 09, 2002 7:35 AM
Subject: Re: locking a file in linux
> Mark Goland wrote:
> >
> > Thi
david wrote:
>the chop(EXP) function always remove the last character (or byte if you are
>dealing with ASCII test only) from the applied EXP or $_ if EXP is omitted.
>it doesn't care what that character is. it's true that if you happen to have
>a single space at the end of your string, chop wi
Will I be able to myself write into a file when I have locked it
...I think you missed the point on the list. There are two types of
lock's. Mandetory and Advisory. When a Mendetory lock is set, no one can
write to a file, or read it for that fact { or atleast to my knowledge
ex: chmod+l fil
looks good! thanks. also, do you know of any books that can be bought for practice
sessions??
Thanks,
Sheena.
rc wrote:hey
here are some links to assignments
~rc
http://courses.cs.vt.edu/~cs2304p/programs/index.html
http://lcg-www.uia.ac.be/~erikt/perl/
http://cs.keene.edu/fachome/sheffn
Sheena Sidhu <[EMAIL PROTECTED]> wrote:
>
> I recently subscribed to this group. I was wondering if there was
> a way to access it the same way as google groups wherein you can
> access mails from previous days too or is emails in the mailbox
> the only way?
The {mail,news}group is available
Is there an easy way to hide ,or spoof, a URL when outputting to html with
perl? For example if I was running a script in my cgi-bin directory, but
wanted the URL to appear differently so as to hide location of my
cgi-directory.
For example, if a visitor is looking at a page located at:
www.myweb
use mod_rewrite.
Tor.
Jose Malacara wrote:
>
> Is there an easy way to hide ,or spoof, a URL when outputting to html with
> perl? For example if I was running a script in my cgi-bin directory, but
> wanted the URL to appear differently so as to hide location of my
> cgi-directory.
>
> For exam
Any suggestions for a relatively bug-free webeditor for use with perl and
MySQL?
Thanks.
Bob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Mike Singleton wrote at Mon, 09 Sep 2002 19:19:22 +0200:
> I think that I have bit off more than I can chew here
I hope, it's O.K., if I'll give some other hints:
> ...
> my $HELP="
> :
>
> This script must be run on the Backup Express master server.
>
> ";
You could also use a HERE
David wrote at Tue, 10 Sep 2002 03:22:52 +0200:
>>> $line =~ /^\s+//;
>>
>>> $line =~ s/^\s+//;
^
>
> even after looking at your reply for 20 seconds, i still didn't see the
> differences... :-) how stupid i am? thanks for spot that.
The difference is that the first one doesn't h
Sheena Sidhu wrote at Tue, 10 Sep 2002 05:11:27 +0200:
> looks good! thanks. also, do you know of any books that can be bought for practice
>sessions??
Perhaps the Perl cookbook.
It also has a lot of questions with answers.
If you only read the TOC first, you'll have a lot of good questions.
82 matches
Mail list logo
