On Thu, May 3, 2012 at 1:35 PM, Lawrence Statton wrote:
> On 05/03/2012 01:02 PM, Terry Shepherd wrote:
>
>> Wow.
>>
>> Thanks for the fast response. This is amazing.
>>
>>
> You're welcome. I'm pretty sure on this list, the custom is not to
&
:25 PM, Terry Shepherd wrote:
>>
>> For a project at work, I need to have my development machine here at
>> my house reachable via a name.
>>
>> I don't have static IP from my ISP (they offer it, but it's an
>> expensive add-on).
>>
>> I have
For a project at work, I need to have my development machine here at
my house reachable via a name.
I don't have static IP from my ISP (they offer it, but it's an
expensive add-on).
I have the router configured so that if you go to
http://205.178.x../mypage you get to my server, but I need to hav
I have forgot that, is there a //= operator in Perl?
which should do the same stuff as:
unless (defined($foo) ) {
$foo = ...;
}
Thanks.
should be able to get better answer from the mod_perl mailing list:
http://perl.apache.org/maillist/modperl.html
--
terry - te...@geekmail.de
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
2011-3-29 14:04, Magnus Woldrich:
Can't see any message body but with two attachments.
I'm using thunderbird 3.
--
terry - te...@geekmail.de
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
story, CGI programming with Perl:
http://oreilly.com/catalog/9781565924192
--
terry - te...@geekmail.de
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
> -Ursprüngliche Nachricht-
>
> How to detect file upload abort using an upload hook in perl. When
> client aborts the upload i need to remove the info about the file
> from
> the db. I can't do it size base, because before upload ends i only
> have an approximate file size (request + fil
an}\n";
}
}
}
And Data::Dumper could help you find out the complicated data structure.
terry.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
于 2011-3-17 17:23, wisma laili 写道:
I have problem in reading a file and change it to get some specific output. For
example : I want to read a file : filename.txt which contain 2 lines:
Data A 1 2 3 4 5
Data B 6 7 8 9 10
the name of the data and the values are tab separated. my wish is to chang
ss, you may want the Term::ReadLine module on CPAN for the case.
terry.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
于 2011-3-16 8:31, Daniel Calvo 写道:
while (<$fh>) {
print;
}
For the first look, you shouldn't be using <> for receiving data from
the socket. For more details, please loot at this article and its comments:
http://www.perlfect.com/articles/select.shtml
--
To unsubscribe, e-mail:
于 2011-3-15 11:11, Ted Mittelstaedt 写道:
On 3/14/2011 11:59 AM, siegfr...@heintze.com wrote:
Does anyone know the perl API (presumably on CPAN) for
useradd/userdel/usermod to automate the manipulation of users on FreeBSD
systems? On Linux systems?
You might look at these modules on CPAN:
Prov
Hello,
I got the form value from web client, and I want to validate the value string
include Chinese words only.
How to do this?
Thanks in advance.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
>
> I have a data that contain unseen characters that I want to delete.
> The unseen characters can be ^L, ^N and other sign that I cannot copy but I
> see them in my data.
>
> Is someone know which regular can help me.
May you try the "dos2unix" command?
--
To unsubscribe, e-mail: beg
Sat, 5 Mar 2011 12:23:49 +0530 письмо от Ramprasad Prasad
:
> I have a web form where people sign up for updates by filling in their email
> address
>
> A lot of users end up not receiving the confirmation mailer because of typos
> in the email id
> Like yhaoo.com or hotmaill.com
>
MaxMind
2011/3/3 Parag Kalra :
> Hi,
>
> I have this basic question from a long time now, so thought of asking.
>
> A Perl script may have many functions. When we execute the script via Perl
> Interpreter, does all the functions are loaded into memory?
>
Though there is a stuff called "AUTOLOAD", but I th
Try again with Net::SNMP.
2011/3/1 sync :
> Hi, all :
>
>
> I have many linux machines connected in a network.
> Now I want ot create a perl script which will list all the machines info in
> a network.
>
>
> Like the following :
> -
> Host: xxx
> OS: xxx
> Kernel :xxx
>
2011/2/24 Shlomi Fish :
> On Wednesday 23 Feb 2011 18:52:30 siegfr...@heintze.com wrote:
>> I apologize if this appears multiple times. When I did not see it
>> appear, I posted again.
>>
>>
>> Does perl have a feature like C# and Java where memory is reclaimed and
>> defragmented?
>>
>>
>> I just
Hi,
when I put this line in a script say a.pl:
#!/usr/bin/perl -wl
...
And later I run it from the command line:
perl a.pl
so, does this make perl ignore the "wl" switch in the script?
Thanks.
--
Free SmartDNS Hosting:
http://DNSbed.com/
--
To unsubscribe, e-mail: beginners-unsubscr...@per
Fri, 18 Feb 2011 11:53:02 -0600 письмо от "Mike Blezien"
:
> Hello,
>
> this is kinda of a crossover to PHP which I'm not that fimilar with.
>
> I have a Perl script that needs to call up a specific function from a PHP
> script, Entry.php calls "Social_preformPost()" function. I simply need
does "return ()" mean return an empty list, or just mean "return" since "()" is
optional in Perl?
thanks!
Thu, 10 Feb 2011 10:04:55 +0200 письмо от Shlomi Fish :
>
> In List context it will return an empty list. You may have meant in scalar
> context in which case:
>
>
Sorry , my typo.
I did mean the scalar context.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional com
Wed, 9 Feb 2011 22:44:10 -0800 (PST) письмо от "C.DeRykus" :
> On Feb 9, 10:07 pm, terry.p...@mail.ru (terry peng) wrote:
> > hello,
> >
> > when in the case "return undef" I prefer just "return" coz in list context
> it will return
>
> return 1 if $exists ;
> return ;
>
> then it is easy to see what conditions will return what values. no need
> for if/else blocks or noisy ?: ops.
>
That's a good solution.
Thanks much. :)
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginner
hello,
when in the case "return undef" I prefer just "return" coz in list context it
will return an empty list.
my $exist = ...
if ($exist) {
return 1;
} else {
return;
}
the code above can work, but having many lines.
So I want:
return $exist ? 1 : (...);
what should be put in (...)
Hello,
How to know that the given text is with which encoding method?
for example, is it ISO-8859-1, UTF-8, KOI8-U, or others?
Thanks.
Mon, 7 Feb 2011 18:11:01 -0800 (PST) письмо от Jim Green
:
> Hello
> I searched cpan and was overwhelmed by the number of modules
> available.
>
> I want a config module that can do updates well, preserving formats of
> original file, preserving blank lines, comments, etc. which one should
>
Thanks Shlomi.
Your statement is a great guide to perl threads to me.
I'm checking the AnyEvent module which looks wonderful.
Thanks again.
Mon, 7 Feb 2011 12:30:32 +0200 письмо от Shlomi Fish :
>
> Well, let me quote the perlbot ( on Freenode's #perl ) factoid:
>
> [quote]
>
>Before
Sun, 06 Feb 2011 18:18:09 -0800 письмо от David Newman
:
>
> This is a multi-part message in MIME format.
>
> --_--=_1297044547631150
> Content-Disposition: inline
> Content-Transfer-Encoding: 8bit
> Content-Type: text/plain
>
> Here's the GIF file you wanted
> --_--=_1297044
Sun, 06 Feb 2011 16:21:58 +0100 письмо от "Dr.Ruud" :
> On 2011-02-06 12:12, terry peng wrote:
>
> > What's the suggested module for perl's threads?
> > I have been using Perl 5.12 under linux.
>
> Stay away from threads. Design and develop in a
what's the message header you got in thunderbird?
Have you set the "Disposition" option to "attachment" rather than the default
"inline"?
Regards.
Sun, 06 Feb 2011 15:38:44 -0800 письмо от David Newman
:
> Greetings. I'm looking for a way to run a query against a SQL database,
> save the resu
Sun, 06 Feb 2011 08:54:50 -0500 письмо от Shawn H Corey :
> On 11-02-06 07:10 AM, Octavian Rasnita wrote:
> > From: "terry peng"
> >> What's the suggested module for perl's threads?
> >> I have been using Perl 5.12 under linux.
> >>
&
What's the suggested module for perl's threads?
I have been using Perl 5.12 under linux.
Thanks.
or die ("Could not open!");
$num_hits = ;
close COUNT;
$num_hits++;
open COUNT, ">$counter_log" or die ("Could not open file for writing!");
print COUNT $num_hits;
close COUNT;
-Terry Grant
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
t).
Then if you needed all of that data back into the original array format
you could dump this hash back into the array (minus the one you removed
of course).
I hope this helps, provided I understood the problem correctly. If not
let me know and I'll try to help further.
Terry
it.
Terry Poperszky
chomp (@directory = `dir /b /O-D`);
open MYFILE, ") {
chomp (); $dir_log{$_} = 1;
}
foreach (@directory) {
print $_ if (exists $dir_log{$_});
}
listing of the current files in the directory
$dir_log currently is file containing the same information as $directory.
I am trying to see if the elements of $directory exist as keys in the hash,
but it isn't working.
Suggestions/Observations?
Terry Poperszky
801-257-5709
Hi,
I've got this shell script:
#!/bin/sh
ps axc|awk "{if (\$5==\"$1\") print \$1}";
... which gets a PID if you feed it the process' name. Is there a way
to translate this into Perl using a standard Perl distribution? I mean,
without calling 'ps'; I've learned enough Perl now to be able to do
Marcelo wrote:
Hi, could anyone recommend a good program to write code, currently using notepad.
Thanks a lot in advance.
Marcelo
I use Textpad, which is a really great editor, that has allot of the
functionality that other commercial apps like CodeWarrior and Visual
SlickEdit have.
--
To uns
Have you tried put a semi-colon and space on the end of each users name?
@names=([EMAIL PROTECTED]; ,[EMAIL PROTECTED]; ,[EMAIL PROTECTED]; );
Terry
-Original Message-
From: Scott, Deborah [mailto:[EMAIL PROTECTED]]
Sent: 27 January 2003 22:54
To: [EMAIL PROTECTED]
Subject: RE: Email
as far as I can make out, apache needs to be running as a sybase user,
you may also need to set some $ENV variables within the script
eg: $ENV{'DSQUERY'}='SQLCAS'
HTH
Terry
-Original Message-
From: Dan Muey [mailto:[EMAIL PROTECTED]]
Sent: 10 January 2003 17
Title: RE: perl and DB connectivities
you could try this little routine,
After opening the connection and making the query:-
while(($rc = $X->ct_results($restype)) == CS_SUCCEED) {
next if ($restype == CS_CMD_DONE || $restype == CS_CMD_FAIL || $restype == CS_CMD_SUCCEED);
@
Thanks to all who sugested that I needed to Define an authentication realm
for my CGI directory
That did the trick!
terry
On Thu, Feb 21, 2002 at 02:42:31PM -, IT Workflow - Terry
Honeyford wrote:
> but when I use Apache 1.3.22 I don't get as many $ENV's back from
>
ENV's back from the
server,
in particular the one my script is looking for - ($ENV{remote_user})
has anyone any idea why this is happening?
TIA
Terry
nsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail:
[EMAIL PROTECTED]
--
Terry Dignon <[EMAIL PROTECTED]>
"I stand by all the misstatements I have ever said"
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
chomp'ing would be the line feed) I think that's whats going on anyway!
Thanks for all your help
Terry Honeyford
On Fri, 25 Jan 2002, IT Workflow - Terry Honeyford wrote:
> I am trying to print out only the lines that begin with Either "Unable to
> attach to", OR "
original line the continues as though the OK/Not OK has
overprinted it!
EG:
Unable to attach to Drive C:
becomes
Unable tNOT OKch to Drive C:
Whereas what I am looking for is:-
Unable to attach to Drive C: NOT OK
Hope this makes the problem clearer!
Many thanks for your help
Terry Honey
don't know what characters are at the end of
lines on a windows machine.
Can anyone help?
TIA
Terry Honeyford
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi all
I'm a complete Perl newbie so please treat me gently :)
I have installed ActivePerl V5.6.1 and also libwww-perl-5.62 and have
gained a VERY basic understanding of Perl. I have programmed databases
using BASIC type languages in the past, but interaction with the Web is
a completely new bea
to count the listing you could try
$number = `ls /path/to/directory|wc -l`;
tmtowtdi?
terry
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
still
open? Is it testing the actual TCP session status? A little enlightenment
would be greatly appreciated. BTW, Stein's "Network programming with Perl" is
an excellent resource for these types of scripts.
Terry
Now the program works for me as expected, with one exceptio
referring to the port pramaters of the
Telnet session and not the problem that I am experiencing.
Any and all help would be appreciated,
--
Terry Poperszky
[EMAIL PROTECTED]
my ($report, $t, $hostname);
$hostname = "tsa038";
use Net::Telnet;
$t = new Net::Telnet;
$t->open(Host
Question? How do I set MCPAN to use passive FTP connection?
Terry
I for one, am really grateful
Terry
...-Original Message-
...From: Ross, Jonathan C. [mailto:[EMAIL PROTECTED]]
...Sent: Tuesday, July 17, 2001 6:03 PM
...To: 'IT Dept - Terry Honeyford'
...Cc: '[EMAIL PROTECTED]'
...Subject: RE: page generation
...
...
...> Thanks f
hen printing to PAGEOUT,
have I got it all wrong?
I Have marked the line in script below, I would be really gratfull for any
suggestions on how to cure this..
TIA
Terry
...
...foreach $NEWPAGE (@pages)
...{
... chomp $NEWPAGE;
... open(PAGEIN, "<$path/ExhibitionFolde
has got to be simple, but It's got me foxed
Can anyone help?
TIA
Terry
if ($Exname ne ""){
$Exname =~ s/ /""/gs;
$ExFoldername = $Exname."_Folder";
if (!-e "/web/html/ExhibitionFolder/98/$ExFoldername")
{
`mkdir /web/h
not sure about this, but you could try using a semi colon as the delimiter
between the "To; CC; Subject; Message;" fields in the mail header
terry
...-Original Message-
...From: Markus Peter [mailto:[EMAIL PROTECTED]]
...Sent: Tuesday, June 19, 2001 2:23 PM
...To: [EMAIL
Thanks to those who helped point me in the right direction.
I looked at the man page,
http://www.perldoc.com/perl5.6/pod/func/readline.html,
and found two forms:
readline(*STDIN) and readline;
the form which I used (readline STDIN)
was not mentioned.
The second form uses an inline form or re
THe following code works on my AIX machines,
but not on Solaris machines. All are running Perl 5.005_03.
What's the story?
Thanks!
#!/usr/local/bin/perl -w
print "account = " ;
$account = readline STDIN ;
chomp($account);
print "account: $account\n";
lid header (name without
value: got line 'could not move file illegal seek at /admin_tfoak line
322.")
the queer thing is that it actualy moves the file then dies!
Any ideas what is going on here?
TIA
Terry
snip ->
320if ($query->param("dcomp")) {
321&a
ader (name without value: got line 'could
not move file illegal seek at /admin_tfoak line 322.")
the queer thing is that it
actualy moves the file then dies!
Any ideas what is going on
here?
TIA
Terry
snip
->
320
if ($query->param("dcomp")) { 321
&a
Title: RE: Beginners Database Question
This looks like just what I am after doing, but we run Netscape fastback server
can anyone point me in the right direction?
TIA
Terry
...Eric B. Leslie wrote ..
...
...> I'm experimenting with putting a db backend on
...everything.
...
Title: good list
Not quite on topic this - but gotta say this is a really usefull list.
Thanks to all who organised the list and all the kind folks that answer us newbies in a way even I can understand!
Terry
Title: RE: Use Strict
What does exactly does use strict do?
...1. I strongly suggest using the pragma
...
... use strict;
...
... It will force you to write less error-prone code.
65 matches
Mail list logo