ing a problem. Given this list, how would I extract JUST the
email address?
From: "James Kelty" <[EMAIL PROTECTED]>
From: [EMAIL PROTECTED]
From: <[EMAIL PROTECTED]"
There are three types that I have seen, and I am having the worst time
trying to come up with a regex to
Say I have two large lists of names (uid's). I would like to look at
both of these files and make sure that a name (uid) doesn't appear in
BOTH files. Just one or the other. Not sure how to handle that. Any ideas?
Thanks.
-James
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional com
Really sorry about this post. Should have looked aroung google a bit. No
need to reply. I figured it out. Thanks!
-James
-Original Message-
From: James Kelty [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, August 28, 2002 9:44 AM
To: [EMAIL PROTECTED]
Subject: Using a file as body of
ell sendmail that the file type is html?
-James
James Kelty
Director of Operations
Everbase Systems, LLC
624 A Street
Ashland, OR 97520
[EMAIL PROTECTED]
541.488.0801
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Yes. If you are using Apache, you can just do it there.
-James
-Original Message-
From: Thiago Ferreira [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, June 11, 2002 12:39 PM
To: beginners-perl
Subject: IP
Hi
I need to control the access for some files in my httpd and I'd like to know
Hey!
Thanks to all of those who responded to my two latest questions. It helped
emensly!
I soon hope to contribute more to the list as well (in the form of answers,
even!).
Thanks again!
-James
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
";
}
sub wanted {
/^base\\.conf\z/s &&
return("$name");
}
Thanks for help in advance!
-James
James Kelty
Sr. Unix Systems Administrator
The Ashland Agency
[EMAIL PROTECTED]
541.488.0801
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hello.
I am writing a quick script in order to parse a users $PATH variable, but I
hit upon a quandry.
The PATH environment is one long string with element separated by a ":", no
mystery there, but
how would I look at each individual element? Normally I would use split on a
line by line basis, b
http://turtle.ee.ncku.edu.tw/openwebmail/
This is by far the best one that I have seen, and it is even written in
Perl!
-James
-Original Message-
From: Anthony E. [mailto:[EMAIL PROTECTED]]
Sent: Thursday, April 18, 2002 12:36 PM
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: th
Can someone point me to the perldoc's that can help me get the localtime
equivalent of the shell command /bin/date +'%Y%m%d' ?
Thanks!
-James
James Kelty
Sr. Unix Systems Administrator
Everbase Systems
541.488.0801
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL
http://www.indigostar.com/sendmail.htm
-James
-Original Message-
From: @fro @ndy [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, April 09, 2002 2:51 PM
To: [EMAIL PROTECTED]
Subject: Location of SendMail
Hello,
I am running Apache HTTP Server Version 1.3 on my Windows 2000 Professional
PC w
What is the best way/module for taking and using options to scripts I write?
In your opinion...
Thanks!
-James
James Kelty
Sr. Unix Systems Administrator
The Ashland Agency
541.488.0801
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
them in my
future code, and what they are REALLY useful for. Thanks alot!
-James
James Kelty
Sr. Unix Systems Administrator
The Ashland Agency
541.488.0801
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
if (defined($conf{Hier}) {
AskQuestion("Enter mode", my @hier = qw/inquiry smart yes/,
$conf{Hier});
}
else {
AskQuestion("Enter mode", my @hier = qw/inquiry smart yes/);
}
sub AskQuestion {
my $prompt = shift;
my @answers = @_;
if(defined($_[2])) {
my $test = $_
@array[0] does work, but it give you a syntax error like this:
@array[0] is better written as $array[0] on line 34
or something.
You have to realize that you are referring to an element of the array in
scalar context, not
in array context.
-James
-Original Message-
From: Steven M. Kl
Here is what I came up with..
#!/usr/bin/perl -w
use strict;
my @heir = qw/inquiry smart yes/;
my $response = "";
while ($response eq "") {
print "Enter the hierarchical mode [$heir[0]]: ";
chomp($response = );
if(($response eq "") || ($response eq "?")) {
print "Valid a
What is the air speed of an unladen swallow?
What? African or European?
-James
-Original Message-
From: Chas Owens [mailto:[EMAIL PROTECTED]]
Sent: Friday, February 15, 2002 1:10 PM
To: Jose Vicente
Cc: perl beginners
Subject: Re: fsck
On Fri, 2002-02-15 at 16:04, Jose Vicente wr
o it doesn't look ugly. I would really
appreciate it if someone could point me to some documentation (web, book,
newgroup). Thanks!
-James
James Kelty
Sr. Unix Systems Administrator
The Ashland Agency
541.488.0801
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For addit
This might work for you. I don't really have all the info from you that I
would need, but assuming that there
is a file "url.txt" that is formated like this:
http://www.feathertrip.net/cgi-bin/index.cgi?client=23894749&;
http://www.feathertrip.net/cgi-bin/index.cgi?client=23894749&;
http://www.fe
hing out. Can
someone explain why? And can some one explain how to slow the while loop
down a bit if not using sleep()?
Thanks!
-James
James Kelty
Sr. Unix Systems Administrator
The Ashland Agency
541.488.0801
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Assume that $file is the names file that you have.
!/usr/bin/perl -w
$file = qq(./file);
$newfile = qq(./newfile);
open FILE, "$file" or die "Cannot open file $file: $!\n";
open INFILE, ">$newfile" or die "Cannot open file $newfile: $!\n";
while () {
chomp($_);
s/(.*)/$1\@feathertrip\.net
%hash('james' => '1',
'james' => '2',
'kelty' => '3',
'biran' => '4');
Thanks!
-James
James Kelty
Sr. Unix Administrator
The Ashland Agency
[EMAIL PROTECTED]
541.488.0801
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
module I missed that would be better?
-James
James Kelty
Sr. Unix Administrator
The Ashland Agency
[EMAIL PROTECTED]
541.488.0801
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Ok, thanks!
-James
-Original Message-
From: Agustin Rivera [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, December 18, 2001 10:49 AM
To: James Kelty; [EMAIL PROTECTED]
Subject: Re: Last line of file...
I've never had an instance where that didn't work. I use for $a(0..$#array
t: Tuesday, December 18, 2001 10:44 AM
To: James Kelty; [EMAIL PROTECTED]
Subject: Re: Last line of file...
In that case, do this..
open(IN, "filename");
@file=;
print "$file[$#file]\n";
Agustin Rivera
Webmaster, Pollstar.com
http://www.pollstar.com
- Original Message ---
Is there a document in perldoc that tells the best way to get the last line
of a file? Below is my usual code for reading a file.
#!/usr/bin/perl -w
$file = qq(/some/file/);
open FILE, "$file" or die "Cannot open file: $!\n";
while() {
do something with the line;
}
close(FILE);
What I w
my $replyto = "james\@feathertrip.net";
my $maxsize = $maxsize;
my $mailprog = "/usr/sbin/sendmail -t";
open(MAIL,"| $mailprog $replyto") or die "Cannot open $mailprog: $!\n";
print MAIL "From: $from\n";
print MAIL "Rep
Hello!
I am new to the list, so forgive me if this is not the correct forum. I am
writing (attempting to anyway) a script that will look at the size of the
filesystem, and warn me if it is getting too full, say 90% percent or so.
Initially I though that combining the df -k output of the system
28 matches
Mail list logo