> Stuart> I have a few perl files that I need to send out to a
> Stuart> client. However, we do not want them seeing what are in the
> Stuart> files for obvious reason.
>
> What obvious reason?
That would be so the client doesn't walk away from the guys who do the work
once they have the goods.
Gary,
Thanks for the reply. Even after changing it to use the CGI module i still had a
problem but i finally figured that out. I had to hard code using libraries {
use lib "/usr/local/lib/perl5/site_perl/5.6.1";
use lib "/usr/local/lib/perl5/site_perl/5.6.1/i686-linux";
} (sounds like i have a
Hello all:
I'm working my way through "Learning Perl" (3rd ed) and got stuck in
ch 14 (Process Management, pages 201-202 actually, to be specific)
where the "date" command is is opened through a filehandle with a
piped open. Just toying around to see how it worked, I put it in a
loop and was
Recommend replacing the parsing routine, mainly because it is said to have a
bunch of security holes:
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs=split(/&/, $buffer);
foreach $pair (@pairs)
{
($name, $value)=split(/=/,$pair);
At 09:33 PM 1/8/02 +0530, Prahlad Vaidyanathan wrote:
>Hi,
>
>Is there a perl equivalent of the 'trap' command in bash ? The reason I
>ask is, I create a temporary file at the start of a script, and I want
>to ensure that that temporary file gets removed in case the user hits
>C-c before the scrip
hello,
I am trying to take input email addresses from an html web form and
email and attachment to that email address. I am using the MIME::Lite
module and have no problems when shortening the script to just the mail
portion and executing via command line. The problem appears to be with
the inp
What shell are you using? Std Dos Commmand or something else? Within
definition or assignment of pl to perl, it should look something like:
File types should have Open: D:\Perl\bin\Perl.exe "%1" %*
Under one build of ActiveState, there were a number of problems in this area
concerning
I'm missing something..
use Date::Manip;
$paidto ="Mon May 19 23:00:00 2003 NZST";
$newpaid = &DateCalc($paidto,"+3 month",\$err);
print "paidto =$paidto\n";
print "newpaid = $newpaid\n";
output
paidto =Mon May 19 23:00:00 2003 NZST
newpaid =
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
Fo
Hi,
Noticed this today :
open(FD,'sudo grep -h "Connect time" /var/log/message* | grep -v COMMAND |') or die
$! ;
# Do some stuff ...
while ( ) {
# do more stuff
}
In the above script (an attempt to check my ppp usage), the script
actually runs 'sudo' only when reading from the file (l
Hi,
Is there a perl equivalent of the 'trap' command in bash ? The reason I
ask is, I create a temporary file at the start of a script, and I want
to ensure that that temporary file gets removed in case the user hits
C-c before the script finishes running.
pv.
--
Prahlad Vaidyanathan <[EMAIL PR
- Original Message -
From: "Peter Cornelius" <[EMAIL PROTECTED]>
> The way that I have done this in the past is to set a cookie after the
> initial authentication. On all pages that require authentication you
check
> for the cookie and validate that it hasn't been tampered with.
Do you u
- Original Message -
From: "Casey West" <[EMAIL PROTECTED]>
To: "Yacketta, Ronald" <[EMAIL PROTECTED]>
Cc: "Beginners (E-mail)" <[EMAIL PROTECTED]>
> open FILE, "filename" or die $!;
> my $line = ;
> close FILE;
>
> Remember, is something you can iterate over. In scalar
> context
> > I have a TK issue.
> >
> > This code creates the initial TK box.
> >
> >
> > When the user clicks the button of his choice, the TK box disappears into
> the task bar.
> > When the user clicks the task bar on the program's name,
> > a window of a DOS screen pops up and asks the user
> > "Ent
Are we talking about user environment variables or system environment
variables?
-Original Message-
From: Dean Theophilou [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, January 08, 2002 6:08 PM
To: Perl_beginner (E-mail); Perl-Win32-Admin@ActiveState. com
Subject: Perplexed
Hello:
> "Stuart" == Stuart Alexander <[EMAIL PROTECTED]> writes:
Stuart> I have a few perl files that I need to send out to a
Stuart> client. However, we do not want them seeing what are in the
Stuart> files for obvious reason.
What obvious reason?
Stuart> Is there any way that I can hide the inf
[EMAIL PROTECTED] wrote:
> Servlets are more scalable than CGIs and that is what is one of the biggest
> advantages!
>
> A Servlet is instantiated for the first request and any subsequent requests
> to the same servlet spawns a separate thread, whereas CGIs are costly and
> had to be instantiated
Hi there..
I am using the WWW:Robot module to iterate over some internal sites, so
complying with the guidelines for robots is not really an issue.
Anyone have any experience modifying the module so that the delay between
requests is less?
Regards,
Lorne
--
To unsubscribe, e-mail: [EMAIL PR
Hello:
I forgot to mention that when I don't use Runh.exe (or if I don't call the
logon script from Usrlogon.cmd), then the logon script works as expected. Once
again, thanks.
Dean
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello:
I created a Perl logon script for use on an NT TSE machine which sets
environment variables and maps drives. It runs as expected when it's run from
the path specified in User Manager for Domains->Profile->Logon Script Name.
Since I don't want the user to be able to see it when he
Hi,
I have no idea how much traffic is on this list, and I have searched all
day for an answer to this question. How do I pass command line
arguments to Perl under Windows 2000? I have the following code
snippet:
&GetOptions("size=s");
print "\nsize is $opt_size\n";
exit;
$opt_size never appe
Hi All,
I have a few perl files that I need to send out to a client. However, we do
not want them seeing what are in the files for obvious reason. Is there any
way that I can hide the info in the files, or should I creat an executable.
Thanks in advance for any help.
Totalise - the Users ISP
Scott wrote:
>
> I need to scan a directory for files, they will be in pairs, a .tag file
> and a .txt file. I need to first make sure the .tag file(s) is there. If
> it is I need to check for the same prefix .txt file. Here is what I do to
> check for the file:
>
> ($scantag) = <*.tag>;
>
>
> -Original Message-
> From: John W. Krahn [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, January 08, 2002 2:28 PM
> To: [EMAIL PROTECTED]
> Subject: Re: pull line #1 from a file
>
>
> Ronald Yacketta wrote:
> >
> > Can someone help me fix this? I know I am on the right track (I hope)
> > but
--- "John W. Krahn" <[EMAIL PROTECTED]> wrote:
> Peter Lemus wrote:
> >
> > I have a file "1st file) that reads...
> > one
> > two
> > three
> > four
> > five
> >
> > Anotherone "2nd file"that reads:
> > day
> > weeks
> > months
> > quarter
> > year
> > century
> >
> > I need to read the 2nd f
Peter Lemus wrote:
>
> I have a file "1st file) that reads...
> one
> two
> three
> four
> five
>
> Anotherone "2nd file"that reads:
> day
> weeks
> months
> quarter
> year
> century
>
> I need to read the 2nd file and add the text from it
> to every word of the first 1st file. So it will look
Ronald Yacketta wrote:
>
> Can someone help me fix this? I know I am on the right track (I hope)
> but not sure where I am going south
>
> open FILE, "$g_logpass";
> $line = ;
> close (FILE);
> chomp($line);
> system("cp ../input/$g_logpass ../input/tmp.scr");
> system("sed -e 's/'$line'/'$db_na
--- "Hanson, Robert" <[EMAIL PROTECTED]> wrote:
> But don't forget that there are other technologies other than servlets that
> cache code so that they don't need to be recompiled for each hit. ...And
> this being a Perl list there is mod_perl a plugin for Apache (free) and
> PerlEx for IIS (from
But don't forget that there are other technologies other than servlets that
cache code so that they don't need to be recompiled for each hit. ...And
this being a Perl list there is mod_perl a plugin for Apache (free) and
PerlEx for IIS (from ActiveState).
Rob
-Original Message-
From:
Servlets are more scalable than CGIs and that is what is one of the biggest
advantages!
A Servlet is instantiated for the first request and any subsequent requests
to the same servlet spawns a separate thread, whereas CGIs are costly and
had to be instantiated afresh for every fresh request. This
On Tue, 8 Jan 2002, Naveen Parmar wrote:
> What are the key differences between CGI and Servlets?
I think Servlets also use the CGI protocol, they accept POST and GET
strings the same way as any CGI program. They are just special server
side components written in Java that are run as a server p
> -Original Message-
> From: Alex Harris [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, January 08, 2002 1:17 PM
> To: [EMAIL PROTECTED]
> Subject: timestamp without the time
>
>
>
>
> How do I get the mm dd a file was created WITHOUT the time?
Note that you cannot strictly get a cr
What are the key differences between CGI and Servlets?
- NP
_
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTEC
> I suspect the answer to this is "you can't abuse perl that way on
> WinNT," but I'll post anyhow.
>
> I'm distributing files across several machines on an NT network; for
> various reasons I need the status that the File::Copy module returns
> but can't rely on mapped drives.
>
> UNCs and IP p
Can someone help me fix this? I know I am on the right track (I hope)
but not sure where I am going south
open FILE, "$g_logpass";
$line = ;
close (FILE);
chomp($line);
system("cp ../input/$g_logpass ../input/tmp.scr");
system("sed -e 's/'$line'/'$db_name'/g' ../input/tmp.scr > $g_logpass");
Works fine on the Linux box, no go on the Windows box. Anyone have
another idea?
Thanks,
-Scott
On Tue, 8 Jan 2002, Scott wrote:
> > I'm new to Perl, so take this with a grain of salt, but I did it like this:
> > use strict;
> > use File::Basename;
> > my $basename;
> > my $filename = 'your
> | for(my $i=0; $i<22; $i++){};
> | $_=;
> | my $line=$_;
> | my $nextline=$line++;
> | if ((substr($line, 42, 7) eq "Running") ||
> | (substr($nextline, 42, 7)eq
> | "Running"))
> >
> > while () {
> ># Skip lines upto line 23
> >next if $.<22;
> >
> ># Process for line 23 & 24
--- Eric Beaudoin <[EMAIL PROTECTED]> wrote:
> I was wondering if someone could explain why a variable define with a global scope
>was slower
> that one define within the local lexical scope when used in a loop?
If I recall correctly, you should usually get better performance from lexically scop
Rick:
Thank you! I modified it to do a scan of all files in the directory
using:
my $basename;
my ($filename) = <*.tag>;
($basename) = fileparse($filename, '\.tag');
print "basename = $basename\n";
On Tue, 8 Jan 2002, Mahon, Rick wrote:
> I'm new to Perl, so take this with a grain of salt,
At 08:28 2002.01.08, Prahlad Vaidyanathan wrote:
>Hi,
>
>Was wondering which of these 2 pieces of code is more efficient :
>
>
>my $file ;
>foreach $file (@tarred) { #do something ; }
>foreach $file (@gzipped) { #do something else ; }
>
>
>OR
>
>
>foreach my $file (@tarred)
I suspect the answer to this is "you can't abuse perl that way on WinNT,"
but I'll post anyhow.
I'm distributing files across several machines on an NT network; for
various reasons I need the status that the File::Copy module returns but
can't rely on mapped drives.
UNCs and IP paths (\\10.98.7
Visit this URL and configure your machine accordingly.
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q150629
-- Rex
> -Original Message-
> From: Naveen Parmar [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, January 08, 2002 1:39 PM
> To: [EMAIL PROTECTED]
> Subject: CGI scripts i
I have Microsoft Personal Web Server on my local machine. My perl scripts
run fine from the command line.
When I try to run them from cgi-bin within INetpub/wwwroot, they fail
raising the HTTP/1.1 500 Server Error.
Any ideas?
- NP
_
From: "Billie" <[EMAIL PROTECTED]>
> What's wrong with the following code?
>
> use Win32::OLE;
> $book = Win32::OLE->GetObject("Book1.xls");
> $book->Saveas("Book2.xls");
>
> Book1 and the script are in the same directory. When I open
> Book2.xls, I cannot see any worksheet.
I don't know what your timeStamp string looks like, but if it looked like:
1/8/2001 18:00
( $date, $time ) = split; would separate the two. The default split here is
on any whitespace. To specify some other split you would do it as follows:
split/:/; (where it would split on ':').
-Origi
I currently use the below, but I have had problems with it running
out on a server that I have not been able to determine the cause of.
Sometimes no Excel file is produced, and other times, voila. It works
everytime locally.
if ( $outputXls ) {
$filename = $outputFilename . ".txt"
How do I get the mm dd a file was created WITHOUT the time?
_
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
This sort of question is a lot easier if we could see the syntax errors.
Here's my guess though.
#foreach $i (@section_headers)
Has $i been declared? Try 'foreach my $i (@section_headers)'
#die "config error - no valid section header\n" if
($config_current_section ne $config_section &&
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, January 08, 2002 1:03 PM
> To: [EMAIL PROTECTED]
> Subject: Perl module to operate on MS Excel files
>
>
> Hello,
>
> I need to automate the extraction and insertion of cells from
> and into an
>
On Tue, 8 Jan 2002, Jose Vicente wrote:
> I can't install the module because I get some errors, when I read README file i find
>this:
>
> BUILDING:
>
>
>set-up these environment variables:
> DBI_DSN The dbi data source, e.g. 'dbi:ODBC:YOUR_DSN_HERE'
> DBI_USER The username to us
Hello,
I need to automate the extraction and insertion of cells from and into an
Excel
spreadsheet. Has anyone done something along this line?
Currently, this is achieved via {save as}/{parse into} using a text or a
..csv file.
Thank you.
PS: I am running Perl in UNIX and Excel in WinNt. UN
> for(my $i=0; $i<22; $i++){}; #This will put
> you at row 23.
> $_=;
> my $line=$_;
> my $nextline=$line++;
> if ((substr($line, 42, 7) eq "Running") ||
> (substr($nextline, 42, 7)eq
> "Running"))
while () {
# Skip lines upto line 23
next if $.<22;
# Process for li
I can't install the module because I get some errors, when I read README file i find
this:
BUILDING:
set-up these environment variables:
DBI_DSN The dbi data source, e.g. 'dbi:ODBC:YOUR_DSN_HERE'
DBI_USER The username to use to connect to the database
DBI_PASS The user
To simulate a case construct use someting like:
/^[\t ]*$/ && do { print "blank\n" };
You just left out the "do".
Also check out Config::IniFiles http://search.cpan.org/search?dist=Config-IniFiles
for text-based config files. Haven't used it, but will as it looks very cool.
Matt
--- Filip Sn
Hi,
I have the following code to parse a config file:
my @section_headers = ("general", "database", "preprocessing",
"postprocessing", "queries");
while(<>)
{
/^[\t ]*$/ && { print "blank\n" };
/^[\t ]*#/ && { print "comment\n" };
/\[.*\]/ &&
{
$config_section = (split
I'm new to Perl, so take this with a grain of salt, but I did it like this:
use strict;
use File::Basename;
my $basename;
my $filename = 'yourfile.tag';
($basename) = fileparse($filename, '\.tag');
print "basename = $basename\n";
# see perldoc File::Basename for more info. fileparse() can give
The question is a bit fuzzy, but try this at the command line, just for fun:
perl -e 'my $line = "abrabracadabra";print $line++, " ", $line, "\n";'
then consider this:
#!D:/cygwin/bin/perl
my ($i, $line, $nextline);
open (TEXTF, "c:/temp/somelines.txt") or die "Evil forces keep me for doing
what
ohmygod
lol
- Original Message -
> Homework Perl assignments? Where can I sign-up for that? :D
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Homework Perl assignments? Where can I sign-up for that? :D
Personally, I learn far better by example than documentation. That's why I
signed up for this group.
Agustin Rivera
Webmaster, Pollstar.com
http://www.pollstar.com
- Original Message -
From: "Casey West" <[EMAIL PROTECTED]>
Thank you David for taking the time to explain it.
-Scott
On Tue, 8 Jan 2002, Wagner-David wrote:
> When you do the read, the pointer(best I can think of) is set at the next
>record. Unless you close the file and re-open the file, the next time you do a read
>it will start where you left
When you do the read, the pointer(best I can think of) is set at the next
record. Unless you close the file and re-open the file, the next time you do a read it
will start where you left off. In a loop, which has the following setup:
while ( ) {
}
Within the lo
Morning:
I need to scan a directory for files, they will be in pairs, a .tag file
and a .txt file. I need to first make sure the .tag file(s) is there. If
it is I need to check for the same prefix .txt file. Here is what I do to
check for the file:
($scantag) = <*.tag>;
@files = glob("*.t
open(FIRST, $firstfile) or die $!;
open(SECOND, $secondfile) or die $!;
@first=;
@second=;
foreach $first_line(@first)
{
foreach $second_line(@second)
{
chomp($first_line); chomp($second_line);
print "$first_line$second_line\n";
}
}
Agustin Rivera
Webmaster, Pollstar.c
Forgive me if my secret homework sensors are too sensitive but this
sounds like a homework assignment.
Because it sounds like a homework assignment, I'll give you pointers
to the documentation which should be very useful.
On Tue, Jan 08, 2002 at 08:47:33AM -0800, Peter Lemus wrote:
:
:Hi,
:I ha
Hi,
I have a file "1st file) that reads...
one
two
three
four
five
Anotherone "2nd file"that reads:
day
weeks
months
quarter
year
century
I need to read the 2nd file and add the text from it
to every word of the first 1st file. So it will look
something like:
oneday
oneweek
onemonth
onequarter
> -Original Message-
> From: Bob Showalter [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, January 08, 2002 11:32 AM
> To: 'Josiah Altschuler'; '[EMAIL PROTECTED]'
> Subject: RE: passing a hash using cgi.pm
>
> Something like this should work, letting CGI.pm do the work
> for you:
>
>my
> -Original Message-
> From: Josiah Altschuler [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, January 08, 2002 11:05 AM
> To: '[EMAIL PROTECTED]'
> Subject: passing a hash using cgi.pm
>
>
> Hi. I'm having trouble passing a hash from one program to
> another through a
> link using cgi.pm.
I am not sure, but I think it has to do with $nextline=$line++; It sounds
like $line is a text string and you are autoincrementing it here? Maybe
what you really want is $nextline++; to count the number of lines?
-Original Message-
From: Lance Prais [mailto:[EMAIL PROTECTED]]
Sent: Tues
That should work. The big problem with it is you are creating an array which
contains the contents of the whole file. Then using only the first element
of that array and ignoring the rest. Depending on the size of your file you
could be wasting huge chunks of memory.
-Original Message-
Fr
would this be valid? or should I seek out a cleaner way?
system("sed -e 's/'chomp($lines[0])'/'$db_name'/g' ../input/tmp.scr >
$g_logpass");
just looking to replace line one in the file with a user supplied value. I
have like
23 files to parse and change per run based on user input.
> -Or
OPEN(FILE, "<$g_all_sleepy) or die "Couldn't open the file";
@lines = ;
CLOSE(FILE);
Chomp @lines;
$variable = $lines[0];
Scott Ryan
OneTel.Net ISP Engineer
[EMAIL PROTECTED]
02073319370
-Original Message-
From: Yacketta, Ronald [mailto:[EMAIL PROTECTED]]
Sent: 08 January 2002 16:06
To
Hi. I'm having trouble passing a hash from one program to another through a
link using cgi.pm. My first program passes the hash like this (it's
actually a hash that is one element of an array of hashes):
print pre a ( { -href =>
"http://140.247.111.176/cgi-bin/redundancies.pl?request=%{$clusArr
so so close...
I had this
OPEN(FILE, "< $g_all_sleepy);
@lines = ;
CLOSE(FILE);
$lines[0]; # think this is right, its an array.. all arrays start at 0 not
1.. unless
# perl is funky and dont ;)
> -Original Message-
> From: Casey West [mailto:[EMAIL PROTECTED]]
> Sent: T
On Tue, Jan 08, 2002 at 10:50:51AM -0500, Yacketta, Ronald wrote:
:
:Folks,
:
:need some minor help here.. been looking in the Cookbook for an example
:to pull the first line from a file..
open FILE, "filename" or die $!;
my $line = ;
close FILE;
Remember, is something you can iterate ove
open(IN, "test") or die $!;
$line=;
close(IN);
print $line;
Agustin Rivera
Webmaster, Pollstar.com
http://www.pollstar.com
- Original Message -
From: "Yacketta, Ronald" <[EMAIL PROTECTED]>
To: "Beginners (E-mail)" <[EMAIL PROTECTED]>
Sent: Tuesday, January 08, 2002 7:50 AM
Subject: pu
On Tue, 8 Jan 2002, Yacketta, Ronald wrote:
> need some minor help here.. been looking in the Cookbook for an example
> to pull the first line from a file..
First line? Just read from the file once and then close:
open FILE, "$filename" or die "Can't open $filename: $!\n";
my $line = ;
close
Folks,
need some minor help here.. been looking in the Cookbook for an example
to pull the first line from a file..
Regards,
Ron
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello all,
At our lab we constantly have emails sent out in the form:
7-15 JanTesting of Product X (POC: Joe Smith) Room 265
2 Jan Leaders Meeting (POC: John Doe)Room 121
8 Jan Review (POC: Tom) Room 30
I am trying to take these word document
We choose to manually install our modules for all of our environments. The CPAN
module has a tendency to grab the latest and greatest of everything.
One nice thing is to use the CPAN.pm to make a 'snapshot' of your modules and make a
bundle out of them. Then just install your custom bundle. You
On Tue, Jan 08, 2002 at 10:05:23AM -0500, Bob Showalter wrote:
:
:> -Original Message-
:> From: Gary Hawkins [mailto:[EMAIL PROTECTED]]
:> Sent: Monday, January 07, 2002 10:35 PM
:> To: [EMAIL PROTECTED]
:> Subject: RE: who is the method cop?
:>
:>
:> Is there a simple yet comprehensive
Better yet..
to ease the search and aid in proper development of a future perl user
http://www.oreilly.com/catalog/lperl3/
more Perl books can be found here
http://perl.oreilly.com/
Regards,
Ron
> -Original Message-
> From: Bob Showalter [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, Jan
> -Original Message-
> From: Gary Hawkins [mailto:[EMAIL PROTECTED]]
> Sent: Monday, January 07, 2002 10:35 PM
> To: [EMAIL PROTECTED]
> Subject: RE: who is the method cop?
>
>
> Unbelievably, I'm actually walking around not fully
> understanding one or more
> of these:
>
> Blessed var
Does it matter what version of perl is currently running (I am on 5.61), and
are there any concerns on using the automatic installation process against a
production environment? Does the automatic process pick the right version
of the module based on what is already installed?
Thanks
Carlin
On Jan 8, Lance Prais said:
>for(my $i=0; $i<22; $i++){}; #This will put you at row 23.
> $_=;
> my $line=$_;
> my $nextline=$line++;
$line is a line of text from the file. Adding 1 to it will not make it
the next line of the file.
Also, $this = $that++ doesn't do what you might think
I am trying to start on a specific line of code and read a sub string of
that code and also read the next line in the sequence and a sub string of
that line. If either of the values are false then do something.
I am using the following code:
for(my $i=0; $i<22; $i++){}; #This will put you at
Families Laws wrote:
>
> I tried to do a change directory and then do a tar of
> the directory:
>
> My program:
>
> system("cd /usr/apps");
Like Jeff told, use the chdir function
(perldoc -f chdir)
>
You should always check the return value of the system command.
Note that return 0 is O
On Mon, 7 Jan 2002, Wagner-David wrote:
> If straight text, then could just read the first line and start on the second:
> my $MyHdrLine = ; # get first line
> WHILE ( ) {
>}
> You have bypassed first line(has carriage return still with it.
> Now you start yo
Folks,
looking for a clean way to change a value in a file on the fly before it is
processed (ran).
I have a perl script that kicks off several resource scripts (.scr) that are
NOT a valid shell script and can not be ran from the command line alone. I
need a way to modify these .scr scripts on th
Prahlad Vaidyanathan wrote:
>
> Was wondering which of these 2 pieces of code is more efficient :
>
>
> my $file ;
> foreach $file (@tarred) { #do something ; }
> foreach $file (@gzipped) { #do something else ; }
>
>
> OR
>
>
> foreach my $file (@tarred) { #do someth
On Mon, 07 Jan 2002 20:34:18 -0500, [EMAIL PROTECTED] (Zentara) wrote:
>Hi, there is a nice perl package, called PDL, which uses PGPLOT.pm
>
>I have PDL running, but I only get the Trio output. The PGPLOT output
>isn't working.
>
>Has anyone installed the PGPLOT perl module, and sucessfully
>run
Hi,
could be more efficient the first code, because you allocate, the memory space
one single time.
In the second code you allocate the memory space every time.
Walter
> Hi,
>
> Was wondering which of these 2 pieces of code is more efficient :
>
>
> my $file ;
> foreach $file (@ta
Please respond to me directly as well as I have limited list access.
I need to know if the following scenario is possible before I put forth the
effort.
I am running on a Sun server.
1. Read a database for packages which need tracking/delivery information.
2. format an HTML URL request based
Hi,
Was wondering which of these 2 pieces of code is more efficient :
my $file ;
foreach $file (@tarred) { #do something ; }
foreach $file (@gzipped) { #do something else ; }
OR
foreach my $file (@tarred) { #do something ; }
foreach my $file (@gzipped) { #do some
Hi, there is a nice perl package, called PDL, which uses PGPLOT.pm
I have PDL running, but I only get the Trio output. The PGPLOT output
isn't working.
Has anyone installed the PGPLOT perl module, and sucessfully
run the tests? I can compile it fine but it chokes when I run the tests.
I have c
The way that I have done this in the past is to set a cookie after the
initial authentication. On all pages that require authentication you check
for the cookie and validate that it hasn't been tampered with. If this
check fails you redirect the user to the login page. To prevent tampering
you
well, i'm guessing, from the error msg that you got that you have:
Too many files specified
what is in $cmd?
are you sure it's a command NT or Cygwin understand?
what happens if you just run the $cmd on a prompt?
why don't you check the return value of open?
if it fails, what's in $! ?
in short,
I think thath is a problem of implementation of TK on Win/DOS.
On Linux with Gnome Desktop i'm tries something script with TK, opening new window by a
button, without problem.
if you post all the code is best...
Walter
> I have a TK issue.
>
> This code creates the initial TK box.
>
> >>
Hi,
how is possible know if a file is open in read/write by another process
???
Thanks
Walter
_
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For a
Hi,
I have been trying to run a piece of perl code in NT that I usually run in
UNIX. I am showing the part of code where I am facing the problem.
open (CPP, "$cmd |");
while () {
chomp();
# Remov
When I use "perldoc" (e.g. "perldoc -f open"), I see stuff like this:
You may use C<&> after C>, CE>, C>, C<+ E>,
C<+EE>, and C<+E>.
How can I make it display those formatting codes properly? Also, is
there a way to make it color code things, so that e.g. C<> and L<>
are colored differently?
--
99 matches
Mail list logo
