Hello Everybody..
What i have done is placed a .cgi file in cgi-bin directory of web server.
In this file i am using on submission
search_results is also placed on cgi-bin dir. of same server.
But it is giving Internal server error.i have not done much in search_results.cgi so
Hello Everyone:
I'm trying determine the best way to check if a file name is contained
within a couple of larger files. I can do a grep from the command line
but, what's the fun of that!? Plus there's about a hundred files which
would be tedious.
Here's my coding attempt:
$dirname = "/var/
Dear rahul,
Here is a sample code for something you want to do.
just add the file handling process to it.
Rajeev Rumale
___
Yesterday is history. Tomorrow a mystery.
Today is a gift. That's why it's called Present.
Hi All,
>
> I have the following lines from a config file I am trying to read:
> {wellfleet ASN} .1.3.6.1.4.1.18.3
> (agentType) .1.3.6.1.4.1.18.3.3.1.11
> (chassisType) .1.3.6.1.4.1.18.3.1.1.1
>
>
>
> My code is:
>
On Mon, Jul 16, 2001 at 03:48:43AM -0300, Papo Napolitano wrote:
> Pleeease anyone know how to send an UDP (or TCP, or ICMP, I don't
> care) chunk of data (AKA packet) to EVERY host on an internal subnet
> (10.0.0.0)? Sending to 10.0.0.255 or 255.255.255.255 doesn't work. And I
> swear I can't
If it's giving an internal server error, it is more than likely that
there
actually *is* some problem with the script, no matter how much you
think they're can't be (I've been in the same situation many a time!)
If you've got access to the error logs, have a look at those (make sure
that everyt
Try sending fatals to the browser using the following:
use CGI::Carp 'fatalsToBrowser';
I've seen a few times where this wouldn't work (for some stupid server
reason) so you can also try the following:
BEGIN {
open STDERR, ">&STDOUT";
$oldfh = select STDOUT;
$|=1;
select STDERR;
$|=1;
sel
Title: getting output immediately of an application started with open-command
Hi all,
if I start a application with open, I get the output of the application, when I exit the application:
$proc_ID = open (GSM, "$config{'jdk.dir'}/bin/java -classpath $config{'env.CLASSPATH'} -Dins
People,
Forgive me am a newbie just started learning perl two days ago. I would like to find
out if its possible with perl I can search a MYSQL database for a particular username
and look for for the expiry date and compare it with the current date to determine
whether expired or not.
Any help
On Saturday 14 July 2001 22:18, Jeff 'japhy' Pinyan wrote:
>
> # prog1
> use Data::Dumper;
> $ENV{ARRAY} = Dumper \@array;
>
> # prog2
> @array = @{ eval $ENV{ARRAY} };
>
I would be really careful with that axe :) evaluating anything that you get
from enviroment variable is a security
we use bpbatch to run on the NIC which works fine.. but that's all in C, not
perl...
in fact, i dont think i could point you to a perl module that does this...
sorry
Jos Boumans
- Original Message -
From: "Papo Napolitano" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, July
One: don't put all those ! in your subject, it's quite annoying
Two: there's a beginners cgi list for just this sort of question
Three: if you want help, you might want to concider describing your problem
a bit more, as well as showing some code
Four: You might want to check, if you're on linux, w
getting output immediately of an application started with open-commandI think what you
want is :
$| = 1;
that enables 'flushing' of the output, ie, doesnt buffer it, but prints right away.
hth
Jos Boumans
- Original Message -
From: Heiko Kundlacz
To: [EMAIL PROTECTED]
Sent: M
On a side not, you might want to concider using the:
use CGI::Carp qw(fatalsToBrowser);
it will direct STDERR to your browser, so you can see where the error is in
the script if any.
hth,
Jos Boumans
- Original Message -
From: "David Wood" <[EMAIL PROTECTED]>
To: "Rahul Garg" <[EMAIL P
Sure, you can connect to a mysql database using the DBI module, available
from cpan.org
you'll also need to install the dbd driver (DBD::Mysql).
Then you can query your data just like you would at a mysql prompt
the documentation is quite extensive, and here's an article that should get
you start
Yes, it's possible.
What you need is to install Perl database modules (DBI) and Perl driver for
MySQL (DBD::MySQL). Maybe your distribution of perl already contains these.
Then, you can connect to the database and do whatever you need to. I'd
recommend you to read the documentation for DBI (wr
Well, are you trying to find several patterns (file1, file2 etc.) in all
files in $dirname, or are you trying to determine wether those file1, file2
etc. exists in $dirname directory? it's not clear from your code
anyway, one more note: you don't need to test 'defined(@files=readdir DIR)',
Try this:
#!/usr/bin/perl -w
use strict;
use DBI;
my $user = 'bob';
my $dbh = DBI->connect('DBI:mysql:database=foo;host=55.55.55.55',
'test',
'test',);
my $cursor = $dbh->prepare("Select user from foo where exp = curdate\(\)
and user = '$user'"
Would a simple check of refering URL help in this?
Something like:
my $referer = $ENV{'HTTP_REFERER'};
if ($referer ne "http://www.your/form/location";){
print qq(Content-type: text/html\n\n
some error message...);
return;
}
Are there any other relatively simple checks which would help maki
Referrer can be easily spoofed. Use server configuration to set up password
authentication - this is the best.
On Monday 16 July 2001 13:26, PURMONEN, Joni wrote:
> Would a simple check of refering URL help in this?
>
> Something like:
>
> my $referer = $ENV{'HTTP_REFERER'};
> if ($referer ne "h
Hello Everybody,
well i am looking for various types of searching...help
1)I want to look out for a particular string in a file.
Actually there is only one strng in each line of a file.
How to search for it.sample codeas i am new to syntax of perl
2)I want to l
On Jul 16, Rahul Garg said:
>1)I want to look out for a particular string in a file.
> Actually there is only one strng in each line of a file.
>How to search for it.sample codeas i am new to syntax of perl
For just finding ONE string in ANOTHER string, the index() func
Subscribers,
I'm trying to get a line count for a number of files. Is sysread() the
preferred (fastest, most efficient) way to go (snippet 1) or should I
read the file into an array and count the array instead (something like
snippet 2, untested)?
Thanks for your insights.
$_ contains the f
here is a routine that I wrote that I use in many scripts as a quick line
count:
sub wc
{
my $file = shift;
my $numlines;
open(FILE,"$file") or die "$file :$!";
$numlines += tr/\n/\n/ while sysread(FILE, $_, 2 ** 16);
return($numlines);
}
> -Original Me
As sysread() doesn't use buffers, it's probably more efficient to use normal
reads. Also, splitting lines by yourself (i.e. in Perl) won't be as efficient
as in C implementation. Thus I recommend to use
open(FILEH, "database/$_") or die "$!";
my @tempfile = ;
close FILEH;
my $lines = scalar @te
Thanks Jos,
Your link is helpful and a good starter.
- Original Message -
From: Jos I. Boumans <[EMAIL PROTECTED]>
To: Ackim Chisha <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Monday, July 16, 2001 11:36 AM
Subject: Re: Searching a MYSQL database
> Sure, you can connect to a mysql da
Peter,
Thanks I seem to be making some progress.
- Original Message -
From: Peter Hanson <[EMAIL PROTECTED]>
To: Ackim Chisha <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Monday, July 16, 2001 11:56 AM
Subject: RE: Searching a MYSQL database
> Try this:
>
> #!/usr/bin/perl -w
>
> use
Here is a starting point. I know that O'Rielly also has a Perl for sys
admin which may of some use.
John
http://www.roth.net/books/handbook/
-Original Message-
From: FIEDRICH,JAMIE (HP-USA,ex1) [mailto:[EMAIL PROTECTED]]
Sent: Friday, July 13, 2001 1:28 PM
To: Perl Beginners List (E-mai
I am writing an app that uses Finance::QuoteHist to fetch historical stock prices. My
problem is that I want to read from a database a list of symbols that at last count
was over 1500 entries long and I run out of memory trying to fetch all of this data at
once. It appears that there is no wa
Hi , I must implement a alert box in Perl Tk.
And I have the following code:
$PROG = "c:/cygwin/usr/sbin/inetd.exe";
system($PROG) or
require Tk::Dialog;
$dialog =$mw-> Dialog( -title => 'INETD ALERT BOX',
-text => "Fail to execute
Hello,
The substitution s/ //g will effectively reset the reference variables $1
$2, So, moving the line ($value = $2) up eleminates the problem.
if ( $_ =~ /\{(.*)\}\s+(.*)/ ) {
$dev = 1;
$opt = lc($1);
$value = $2;
$opt =~ s/ //g;
}
Hope this helps,,,
Aziz,,,
In article <[
Don't do the "put a file into an array" trick if you're not VERY sure the
file is small.
It's generally concidered bad programming practice and a recipe for disaster
if you dont control the input.
having said that, i'd like to note that there's also a memory penalty for
using an array over a stri
Hello,
To check if the file exists, use the -e operator:
if(-e $PROG){
system $PROG;
} else {
require Tk::Dialog;
...
...
}
Hope this helps,,,
Aziz,,,
In article <[EMAIL PROTECTED]>, "Jorge
Goncalvez" <[EMAIL PROTECTED]> wrote:
> Hi , I must implement a alert box in Perl Tk.
>
> A
On Jul 16, Martijn van Exel said:
>I'm trying to get a line count for a number of files. Is sysread() the
>preferred (fastest, most efficient) way to go (snippet 1) or should I
>read the file into an array and count the array instead (something like
>snippet 2, untested)?
Do NOT read a file
I believe the java application should be the one flushing its output.
Since I'm not a java programmer, I wouldn't know how to do that.
(output should be flushed so that the other app can read it).
Hope this helps,,,
Aziz,,,
In article <000701c10ddb$dece5e70$77887382@jynnantonix>, "Jos I. Bouma
On Jul 16, Will Muir said:
>for my $i (0 .. $#quotes){
>
>$sth->execute($quotes[$i][0],$quotes[$i][1],$quotes[$i][2],$quotes[$i][3],$quotes[$i][4],$quotes[$i][5],$quotes[$i][6],$quotes[$i][7])||
> die "error: ", $dbh->errstr;
>}
First, you should turn that into an array slice:
@{ $quotes[$i]
--- Steve MacMullin <[EMAIL PROTECTED]> wrote:
> Hi everyone,
>
> I'm new to using perl and am having a terrible time debugging things
> because
> of the (seemingly to me) quite unhelpful run-time errors. I do use:
> 'use
> strict;' and get an error like the following: 'Scalar found where
> ope
Just wondering what the policy on sending file attachments to the list !
I have a script I am trying to debug but it pretty long, and I was wondering
if I could send as an attachment, or should I just include in the email ?
Thanks
Jim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additi
ideally you wouldn't
its ok if the attachment is ~ 10k though
Pierre
- Original Message -
From: "Kipp, James" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, July 16, 2001 3:43 PM
Subject: Policy on file attachments
> Just wondering what the policy on sending file attachment
Thanks
I think I will just include in the email text as a long snip
> -Original Message-
> From: Pierre Smolarek [mailto:[EMAIL PROTECTED]]
> Sent: Monday, July 16, 2001 10:47 AM
> To: Kipp, James; [EMAIL PROTECTED]
> Subject: Re: Policy on file attachments
>
>
> ideally you wouldn't
>
H, I would like to popup an alert nbox when the network is down, how can I do
it?
Thanks.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Have you checked your permissions?
-Original Message-
From: Rahul Garg [mailto:[EMAIL PROTECTED]]
Sent: 16 July 2001 09:00
To: [EMAIL PROTECTED]
Subject: CGI-PERL!!!HELP!!!
Hello Everybody..
What i have done is placed a .cgi file in cgi-bin directory of web
Title: FW: getting output immediately of an application started with open-command
Hi again,
where can I get help for this problem? 2 possible reasons can be responsible for this problem:
1. The output is unflushed (maybe only on Win2000)
2. The perl-program will be locked, until the chil
Hey!
I'm trying to install a filter like filter::util::call or filter::simple,
however when I do, both come up with a significant amount of files missing.
I do not believe that it's my computer however. I was wondering if anyone
knew of anyone other filters that perform the same function, or so
- Begin Forwarded Message -
Date: Mon, 16 Jul 2001 17:48:29 +0200 (MEST)
From: Jorge Goncalvez
Subject: Re:Retrieve host
To: [EMAIL PROTECTED]
Mime-Version: 1.0
Content-MD5: wPL9znYmDeTyzQcXNKmp1Q==
Hi I have the following code:
use Net::Ping;
$p = Net::Ping->n
Could be down to different installations of Perl, under different
locations.
Try doing (on *nix cmd line) :-
find /usr/lib/perl -name missing_filename.pm
...for every file it requires.
This will (should) give you a list of paths for those files, which you
could
append to the @INC array with ei
Hamish, your regex's seem to work OK, and so does the elsif (at least in the
slightly modified test case I'm using). How do you know the elsif is not
executing/matching? You are looping through your config file a line at a
time I assume. Anyway, here's the test code I ran which worked, using as th
I've just seen a strange thing. I made up a simple perl program:
#!/usr/local/perl -w
my ($summary_data);
$summary_data->{'express'} = "blahblahblah\n";
print $summary_data->{'express'};
Notice that $summary_data is not initialized, so when used as a reference,
it
--- Eric Chun <[EMAIL PROTECTED]> wrote:
> I've just seen a strange thing. I made up a simple perl program:
> #!/usr/local/perl -w
> my ($summary_data);
> $summary_data->{'express'} = "blahblahblah\n";
> print $summary_data->{'express'};
> Notice that $summary_data is not
On Jul 16, Eric Chun said:
> #!/usr/local/perl -w
> my ($summary_data);
> $summary_data->{'express'} = "blahblahblah\n";
> print $summary_data->{'express'};
>Notice that $summary_data is not initialized, so when used as a reference,
>it will point to the memory address 0x
Hi Everyone,
I am trying to use the OLE method of connecting to an ADO connection in MS
SQL. I have copied working VBScript code and I am trying to convert it to
Perl. Any ideas on how to make this work?
If you know how to execute a stored procedure using Win32::ODBC->$sql (or
whatever) in a rem
Hello,
The following uppercase'S the whole string, when all I want is the first letter.
&uppercase($bears->{"rec$n"}{name}), uc($bears->{"rec$n"}{type}) # works but caps the
whole string
}
u\$bears->{"rec$n"}{type} # does not work...
sub uppercase{
($s) = @_;
\u$s = scalar $s; ## does n
use ucfirst instead of uc
-Original Message-
From: David Gilden [mailto:[EMAIL PROTECTED]]
Sent: Monday, July 16, 2001 12:28 PM
To: [EMAIL PROTECTED]
Subject: upper-casing the first char & hashs of hashs
Hello,
The following uppercase'S the whole string, when all I want is the first
l
replace uc with ucfirst.
Wags ;)
-Original Message-
From: David Gilden [mailto:[EMAIL PROTECTED]]
Sent: Monday, July 16, 2001 10:28
To: [EMAIL PROTECTED]
Subject: upper-casing the first char & hashs of hashs
Hello,
The following uppercase'S the whole string, when all I want i
--- David Gilden <[EMAIL PROTECTED]> wrote:
> The following uppercase'S the whole string, when all I want is the
> first letter.
> sub uppercase{
> ($s) = @_; return uc($s); # works but caps the whole string
> }
Others have already said to use ucfirst. =o)
> lastly, in this hash of hashs..
>
This is for newbies, right? Can anyone tell me why a s/^M//g won't get rid of the
annoying ^M on the end of each line of an imported Paradox database? Is there a better
way? I know this has to be simple, yet I can find no reference in my plethora of Perl
books.
TIA for any and all help - you gu
I believe chomp will take care of the line-ending code.
-Original Message-
From: System Administrator [mailto:[EMAIL PROTECTED]]
Sent: Monday, July 16, 2001 1:49 PM
To: [EMAIL PROTECTED]
Subject: Problems with ^M
This is for newbies, right? Can anyone tell me why a s/^M//g won't get rid
Hi All
Having been a lurker on this list for some time now (soaking up the
wisdom!), not having needed to use Perl for any projects recently, I
thankfully now have the need to do some good old data munging (quite
refreshing once in a while ;-)) and thought it about time I turned to you
guys f
I am using perl 5.6.1 with NT. From a dos prompt I said "perl -de 0"
expecting to start up the debug invironment but got the following message:
default die handler restored
Unable to connect to remote host: 127.0.0.1:2000
Compilation failed to require
Begin failed - compilation aborted
I tri
On Mon, 16 Jul 2001, System Administrator wrote:
> This is for newbies, right? Can anyone tell me why a s/^M//g won't get
> rid of the annoying ^M on the end of each line of an imported Paradox
> database? Is there a better way? I know this has to be simple, yet I
> can find no reference in my pl
--Warning-- Answer coming from relative Newbie!
I think you need to press CTRL V and then CTRL M to represent that
character. Caret-M doesn't work. I had this problem with some stuff on
FreeBSD and was pointed to the following link:
http://www.freebsddiary.org/control-m.php
Several solutions ar
IIRC
perl -pi -e 's/\r//'
works very well also...
Brent
[EMAIL PROTECTED]
The bloody ^M character stems from a everybody having their own way of
terminating a line. In the days of the typewriter, you had to have a
new line and then a carriage return. Well, in winders that's still how
they do things. They end their lines with \n\r which is newline -
carriage return.
Thank you - I went to the web page. I couldn't get the "control-V,
control-M" to work because everytime I type it in the ^V changed to a ^M
which I couldn't even backspace out. I reloaded the file in ASCII mode
though, and everything is great. Thank you very much for the instant help -
what a res
At 11:21 16/07/2001 -0700, Randal L. Schwartz wrote:
> > "Ingram" == Ingram <[EMAIL PROTECTED]> writes:
>
>Ingram> What I would like to know is there any way to increase the efficiency
>Ingram> of my code, or are there any other ways to accomplish such a task in a
>Ingram> more efficient / op
Are you transferring these files via ftp? If so it sounds like you are
using bin mode when you want ascii (ascii translates the line termination
chars for you).
Just 2 bits.
Peter C.
> This is for newbies, right? Can anyone tell me why a s/^M//g
> won't get rid of the annoying ^M on the end of
I have Active Perl installed on my laptop and it works find on the command line but
when I try and call a .pl file from HTML I get the code displayed instead of the
correct output. I found references to associating perl with the browser but I've get
to get it right.
Is there a website with det
On Mon, 16 Jul 2001, Christopher Williams wrote:
> I have Active Perl installed on my laptop and it works find on the
> command line but when I try and call a .pl file from HTML I get the
> code displayed instead of the correct output. I found references to
> associating perl with the browser but
A friend recently gave me a copy of Learning Perl, 2nd Edition, and I was
wondering how out of date it is. Is it useful in order to learn from
(where I work, we use Perl 5.6) or should I save up and buy 3rd Edition?
--Chris
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands,
Sorry,
Windows98.
Thanks
Christopher
On Mon, 16 Jul 2001, Christopher Williams wrote:
> I have Active Perl installed on my laptop and it works find on the
> command line but when I try and call a .pl file from HTML I get the
> code displayed instead of the correct output. I found references t
On Mon, 16 Jul 2001, Christopher Williams wrote:
> Sorry,
>
> Windows98.
And the web server you are using?
-- Brett
http://www.chapelperilous.net/btfwk/
Youth is a disease from which we a
You need to have a web server installed that will call perl for the script.
http://www.omnicron.ca has OMNIHTTP'd which is free for non-commercial use.
If Perl is in your path, the web server will automatically call it and
display the results to the browser.
Keep in mind that something that wo
On Mon, Jul 16, 2001 at 03:21:11PM -0400, Chris wrote:
>
> A friend recently gave me a copy of Learning Perl, 2nd Edition, and I was
> wondering how out of date it is. Is it useful in order to learn from
> (where I work, we use Perl 5.6) or should I save up and buy 3rd Edition?
The 3rd edition s
On Mon, 16 Jul 2001, Christopher Williams wrote:
> I don't think I am, I'm not trying to post a webpage to a server, just
> learn perl and html on my local machine. Do I need to setup a server
> function on it ?
You certainly do need a web server before you can run CGI scripts on the
server side
WinNT comes with "Personal Web Server" (PWS) which is how I'm learning Perl
CGI. You can put your scripts in C:\Inetpub\wwwroot\cgi-bin. You can then
run them by going to:
your_homepage\cgi-bin\your_script.pl. I'm not sure if Windows 98 comes with
PWS. Sorry I couldn't be of more help - just l
On Mon, 16 Jul 2001, Stout, Joel R wrote:
> WinNT comes with "Personal Web Server" (PWS) which is how I'm learning Perl
> CGI. You can put your scripts in C:\Inetpub\wwwroot\cgi-bin. You can then
> run them by going to:
> your_homepage\cgi-bin\your_script.pl. I'm not sure if Windows 98 comes w
How do I compare if a value it missing?
I want to use a second date if the first date is missing.
#Imagine my vars have this data
$date1="";
$date2="10/2/1997";
if ($date1 eq "") {#do I use "", MISSING key word ?
$date1 = $date2;
}
Thanks,
Mike
--
To unsubscribe, e-ma
An empty string will return false in a boolean context. So,
unless ($date1)
{
$date1=$date2;
}
will work.
Personally, i prefer:
$date1 ||= $date2;
It seems more 'perlish' ;)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--- Mike Patterson <[EMAIL PROTECTED]> wrote:
> How do I compare if a value it missing?
> I want to use a second date if the first date is missing.
>
> #Imagine my vars have this data
> $date1="";
> $date2="10/2/1997";
>
> if ($date1 eq "") {#do I use "", MISSING key word
>
Hi people!
It sounds a bit stupid but I don't know the way to remove white spaces in a
string.
$string = "No sé como quitar los putos spacios";
and now?
thanks for your help
Javier B.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Try:
$string =~s/ //g;
That will get rid of all spaces. If you also want to get rid of tabs,
$string =~s/[ \t]//g;
Or you can use a \s instead of \t to also get rid of newlines, carriage
returns and form feeds.
Pete Hanson
source1results.com
-Original Message-
From: softhome [mailto:
$string =~ s/\s+//g;
matches one or more spaces (\s+), replaces them with nothing (//), repeats
until the string ends (g).
Rob
- Original Message -
From: softhome <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, July 16, 2001 8:35 PM
Subject: removing white spaces
> Hi people!
if I invoke this script as follows:
perl bears.pl
ARGV[0] never seems to be false even though there are no args..
What did I do wrong here?
Thanks
Dave
#!/usr/bin/perl -w
$sort_order = $ARGV[0] || $usage; # grab command line args
$usage ="
# Type a number after the script name to choose the
Amazon and others are back ordered 3 to 5 weeks. Does any know of a online
retailer that has them in stock?
Thanks
Craig ><>
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
>From a newbie perspective, your code is flawed (no offense :)). Your line:
$sort_order = $ARGV[0] || $usage;
is saying set $sort_order to $ARGV[0] (no matter what it is, or even if it's
defined) or eval (not sure if that's the right word for this context)
$usage. So the code is doing the firs
Hello,
Is there a concept of macros in perl, i.e.
Is there some thing like preprocessor processing
in perl. Thanks in advance.
--
Thanks and Regards,
D.Rajanikanth
> "Jason" == Jason Purdy <[EMAIL PROTECTED]> writes:
Jason> From a newbie perspective, your code is flawed (no offense :)). Your line:
Jason> $sort_order = $ARGV[0] || $usage;
Jason> is saying set $sort_order to $ARGV[0] (no matter what it is, or even if it's
Jason> defined) or eval (not su
On Jul 16, David Gilden said:
>$sort_order = $ARGV[0] || $usage; # grab command line args
>
>$usage ="
># Type a number after the script name to choose the type of sorting:
># 1 = sort by type
># 2 = sort by name
># 3 = sort by color
># 4 = sort by food
>#
># Example:
># perl bears.pl 1
># sorts
one more simpleQ...
After opening the file ,
How to read a file line by line...sample code
Thax in advance.
waiting for replies.
- Original Message -
From: Jeff 'japhy' Pinyan <[EMAIL PROTECTED]>
To: Rahul Garg <[E
This should help you, the while will step through each line of the text
file, and you can do whatever you want using the magical $_ variable.
God I love perl.
open(F, ") {
do something with $_;
}
close(F);
Brian Johnson
Partner/Systems Administrator/Programmer
Source1Hosting.tv, LLC (www.s
Hello,
Is there a concept of macros in perl, i.e.
Is there some thing like preprocessor processing
in perl. Thanks in advance.
--
Thanks and Regards,
D.Rajanikanth
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
91 matches
Mail list logo
