[28652] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 10016 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Nov 28 18:10:25 2006

Date: Tue, 28 Nov 2006 15:10:13 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Tue, 28 Nov 2006     Volume: 10 Number: 10016

Today's topics:
        MI5 Persecution: Bernard Levin expresses his views MI5-Victim@mi5.gov.uk
        MI5 Persecution: Bernard Levin expresses his views MI5-Victim@mi5.gov.uk
        MI5 Persecution: Bizarre magazine MI5-Victim@mi5.gov.uk
        MI5 Persecution: Financial Times MI5-Victim@mi5.gov.uk
        MI5 Persecution: harassment at work MI5-Victim@mi5.gov.uk
        MI5 Persecution: Lander on C4 MI5-Victim@mi5.gov.uk
        MI5 Persecution: Observer article MI5-Victim@mi5.gov.uk
        MI5 Persecution: their methods and tactics MI5-Victim@mi5.gov.uk
        MI5 Persecution: who knows about it? MI5-Victim@mi5.gov.uk
        perl on Mac/OS X Tiger <hlarons@yahoo.com>
    Re: perl on Mac/OS X Tiger <tbmoore9@verizon.net>
    Re: perl on Mac/OS X Tiger <spamtrap@dot-app.org>
    Re: perl on Mac/OS X Tiger (Randal L. Schwartz)
        Perl/Mail Suggestion.... <amerar@iwc.net>
    Re: Perl/Mail Suggestion.... <amerar@iwc.net>
    Re: Perl/Mail Suggestion.... <mislam@spam.uiuc.edu>
        Perlthrtut threadqueue example :  possibly incorrect ? klestes@gmail.com
    Re: Perlthrtut threadqueue example :  possibly incorrec xhoster@gmail.com
    Re: regex matching exactly 10 digits <mritty@gmail.com>
    Re: regex matching exactly 10 digits <rvtol+news@isolution.nl>
        Replacement in a string with a function call. <Holleran.Kevin@gmail.com>
    Re: Replacement in a string with a function call. <noreply@gunnar.cc>
    Re: Replacement in a string with a function call. <noreply@gunnar.cc>
    Re: Replacement in a string with a function call. <Holleran.Kevin@gmail.com>
    Re: Validation with XSD using XML::LibXML::Schema, and  huntingseasonson@gmail.com
    Re: Validation with XSD using XML::LibXML::Schema, and  <nobull67@gmail.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 28 Nov 2006 15:19:26 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: Bernard Levin expresses his views
Message-Id: <m06102816140267@4ax.com>


The article of which part is reproduced below was penned by Bernard Levin
for the Features section of the Times on 21 September 1991. To my mind, it
described the situation at the time and in particular a recent meeting with
a friend, during which I for the first time admitted to someone other than
my GP that I had been subjected to a conspiracy of harassment over the
previous year and a half.

>There is a madman running loose about London, called David Campbell; I have
>no reason to believe that he is violent, but he should certainly be
>approached with caution. You may know him by the curious glitter in his
>eyes and a persistent trembling of his hands; if that does not suffice, you
>will find him attempting to thrust no fewer than 48 books into your arms,
>all hardbacks, with a promise that, if you should return to the same
>meeting-place next year, he will heave another 80 at you.
>
>If, by now, the police have arrived and are keeping a close watch on him,
>you may feel sufficiently emboldened to examine the books. The jackets are
>a model of uncluttered typography, elegantly and simply laid out; there is
>an unobtrusive colophon of a rising sun, probably not picked at random.
>Gaining confidence - the lunatic is smiling by now, and the policemen, who
>know about such things, have significantly removed their helmets - you
>could do worse than take the jacket off the first book in the pile. The
>only word possible to describe the binding is sumptuous; real cloth in a
>glorious shade of dark green, with the title and author in black and gold
>on the spine.
>
>Look at it more closely; your eyes do not deceive you - it truly does have
>real top-bands and tail-bands, in yellow, and, for good measure, a silk
>marker ribbon in a lighter green. The paper is cream-wove and acid-free,
>and the book is sewn, not glued.
>
>Throughout the encounter, I should have mentioned, our loony has been
>chattering away, although what he is trying to say is almost impossible to
>understand; after a time, however, he becomes sufficiently coherent to make
>clear that he is trying to sell the books to you. Well, now, such quality
>in bookmaking today can only be for collectors' limited editions at a
>fearsome price - #30, #40, #50?
>
>No, no, he says, the glitter more powerful than ever and the trembling of
>his hands rapidly spreading throughout his entire body; no, no - the books
>are priced variously at #7, #8 or #9, with the top price #12.
>
>At this, the policemen understandably put their helmets back on; one of
>them draws his truncheon and the other can be heard summoning
>reinforcements on his walkie-talkie. The madman bursts into tears, and
>swears it is all true.
>
>And it is.
>
>David Campbell has acquired the entire rights to the whole of the
>Everyman's Library, which died a lingering and shameful death a decade or
>so ago, and he proposes to start it all over again - 48 volumes this
>September and 80 more next year, in editions I have described, at the
>prices specified. He proposes to launch his amazing venture simultaneously
>in Britain and the United States, with the massive firepower of Random
>Century at his back in this country, and the dashing cavalry of Knopf
>across the water, and no one who loves literature and courage will forbear
>to cheer.

At the time this article was written I had believed for some time that
columnists in the Times and other journalists had been making references to
my situation. Nothing unusual about this you may think, plenty of people
have the same sort of ideas and obviously the papers aren't writing about
them, so why should my beliefs not be as false as those of others?

What makes this article so extraordinary is that three or four days
immediately preceding its publication, I had a meeting with a friend,
during the course of which we discussed the media persecution, and in
particular that by Times columnists. It seemed to me, reading the article
by Levin in Saturday’s paper, that he was describing in some detail his
"artist’s impression" of that meeting. Most telling are the final
sentences, when he writes, "The madman bursts into tears, and swears it is
all true. And it is." Although I did not "burst into tears" (he seems to be
using a bit of poetic licence and exaggerating) I did try hard to convince
my friend that it was all true; and I am able to concur with Mr Levin,
because, of course, it is.

At the beginning of the piece Levin reveals a fear of being attacked by the
"irrational" subject of his story, saying "I have no reason to believe that
he is violent, but he should certainly be approached with caution". This
goes back to the xenophobic propaganda of "defence" against a "threat"
which was seen at the very beginning of the harassment. The impression of a
"madman running loose" who needs to be controlled through an agency which
assigns to itself the mantle of the "police" is also one which had been
expressed elsewhere.

In the final paragraph of this extract, his reference to Everyman’s Library
as having "died a lingering and shameful death a decade or so ago" shows
clearly what sort of conclusion they wish to their campaign. They want a
permanent solution, and as they are prevented from achieving that solution
directly, they waste significant resources on methods which have been
repeatedly shown to be ineffective for such a purpose.

435


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 15:27:19 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: Bernard Levin expresses his views
Message-Id: <m06102816215536@4ax.com>

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
-= why won't the British police do their job and put a stop to it? -=
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

The British police obviously do know what is taking place. Besides my
interpretations of what individual officers have said which forces that
conclusion, it would be inconceivable for them to be unaware of something
on this scale.

If they know, then they will know that the abusers have broken laws in the
UK and abroad. Recently the UK introduced laws against electronic spying
which carry a penalty of several years jail if caught. If the police know
illegal harassment is taking place, and do nothing about it, then they are
failing in their responsibilities.

Last Easter (1995) I went into the local police station in London and spoke
to an officer about the harassment against me. But I couldn't provide
tangible evidence; what people said, in many cases years ago, is beyond
proof, and without something to support my statements I cannot expect a
police officer to take the complaint seriously.

The current situation with regard to the police is not one which allows a
breakthrough in dealing with the problem. On the one hand, most individual
officers at a local police station may not know about the ongoing assaults,
so a complaint at that level will not yield results. Yet the police as an
organisation do know of the harassment, and they must be aware that a
complaint has been made at a police station. So it is clearly their duty to
take preventative action against the continuing molestation, but because
the criminals are operating on behalf of a state agency, the police are not
carrying out their duty.

435


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 20:31:45 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: Bizarre magazine
Message-Id: <m06102821262113@4ax.com>


Bizarre magazine article June/2001

The appropriately-named Bizarre magazine, a UK publication, featured my website on page 114 of their June 2001 issue
(number 47). They present a copy of the letter MI5 sent me in February 1997. 

This article was pointed out to me by a reader of Bizarre magazine. I suppose I should be pleased to be placed at no. 1
of a list of top ten paranoid sites, even though paranoia is only incidental to the the material on this website, which
is objective. 

436


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 20:44:06 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: Financial Times
Message-Id: <m06102821384398@4ax.com>


Financial Times 17/Sept/1999

David Bowen performed a Web Site Inspection in the Financial Times, in which he compared the "Open Government" approach
of the American intelligence community with the closed world of British spookdom. The second paragraph mentions this site. 

It appears that there are very few sites with material information on SS/SIS, which leads to this site's descriptions of
those agencies being frequently linked to by other persons' pages. Perhaps there is an irony that American agencies which
have much more capability appear to be more transparent than British agencies which have much less. 

435


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 16:10:49 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: harassment at work
Message-Id: <m06102817052660@4ax.com>

-=-=-=-=-=-=-=-=-=-=-=-=
-= harassment at work -=
-=-=-=-=-=-=-=-=-=-=-=-=

Once I stopped watching television and listening to the radio at the end of
1990, "they" had to find other ways of committing abuses. So they took what
must be for them a tried and tested route; they get at you by subversion of
those around you. Since they wouldn't be able to do that with my family or
friends, that meant getting at people in the workplace to be their
mouthpieces and do their dirty work for them.

They supplied my employers in Oxford with details from what was going on in
my private life, and what I and other people had said at my home and
accommodation in Oxford. So people at work repeated verbatim words which
had been said in my home, and repeated what I'd been doing recently. Often
the most trivial things, the ones from your domestic life, are the ones
which hurt most. One manager in particular at Oxford continuously abused me
for ten months with verbal sexual abuse, swearing, and threats to terminate
my employment. After ten months I was forced to seek psychiatric help and
start taking medication, and was away from work for two months. I spoke
later with a solicitor about what had happened at that company; he advised
it was only possible to take action if you had left the company as a result
of harassment, and such an action would have to be started very soon after
leaving.

Over a year later the same manager picked on another new worker, with even
more serious results; that employee tried to commit suicide with an
overdose as a result of the ill-treatment, and was forced to leave his job.
But he didn't take action against the company, either. Abuse at work is
comparable to that elsewhere in that tangible evidence is difficult to
produce, and the abusers will always have their denials ready when
challenged. And even if a court accepts what you say happened, it still
remains to prove that abuse causes the type of breakdown I had at the end
of 1992. In a recent case before a British court, a former member of the
Army brought a case against others who had maltreated him ten years
previously. Although the court accepted that abuse had occurred, it did not
agree that depressive illness necessarily followed, and denied justice to
the plaintiff.

436


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 21:27:40 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: Lander on C4
Message-Id: <m06102822221613@4ax.com>


Stephen Lander on Channel Four TV

MI5's Director-General, Stephen Lander, appeared in Channel Four's programme "The Power List" on 31/October/1998.
The series of three programmes described the most influential people in British society. 

To my deep amusement and Lander's undoubted chagrin, Fulcrum Productions, makers of the programme, chose to illustrate
the piece using screen-shots of my website. To the best of my knowledge this is the only time this website has featured
on British television screens. 

436


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 21:13:08 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: Observer article
Message-Id: <m06102822074497@4ax.com>


Observer article 9/March/1997
Fame at last! In an alleged book review in the Observer (Books p16), Jay Rayner writes about a "man called Bob"
(one of my many pseudonyms) in whom "a lot of people have shown an interest". Read and ponder!

Perhaps the Chinese curse "may you live in interesting times" could be re-worded into "may you be considered an
interesting person". Infamy, infamy, they've all got it in for me! 

436


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 16:01:56 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: their methods and tactics
Message-Id: <m06102816563215@4ax.com>

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
-= why the security services? -=
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

You may ask, why do I think the "they" referred to are the security
services? Is there any evidence that there is a single source, as opposed
to a loosely based "whispering campaign" amongst many people? Even if there
is a single source, is there any evidence that "they" are professional
"buggers" as opposed to amateurs, or perhaps people working for a privately
funded organization?

a) As to the question of a single source versus something more fragmented;
it is quite obvious that there is a single source from the way the campaign
has been carried out. Since things have been repeated verbatim which were
said in my home, there must be one group which does the watching and
listening. Since on several occasions (mainly during travel) people have
been planted in close proximity and rehearsed in what they were to say, it
follows that someone must have done the planning for that, and again a
single source is indicated.

b) So why couldn't it be amateurs? Why couldn't it be a private
organisation, for example a private detective agency paid to manage the
campaign and undertake the technical aspects? Some detective agencies are
unscrupulous as has been proved on the occasions in the past when they've
been exposed or caught; they too can have access to the bugging technology
deployed; and there are reported cases of MI5 paying private eyes to do
their dirty work (against peace campaigners and similar enemies of the
state) on the understanding that if they were caught then they could deny
all knowledge. Why couldn't that be the case?

The main factor pointing to direct security service involvement (as opposed
to amateurs or MI5 proxies) is the breadth of their access to the media in
particular, and the fact that the television companies are so involved in
the campaign. The BBC would not directly invade someone's home themselves,
since it would not be within their remit to allocate personnel or financial
resources to do so. An organisation of their stature would not take part in
a campaign set up by private sources. The only people they would take
material from would be the security services, presumably on the assumption
that if the cat ever flew out of the bag yowling it would be MI5 who would
take the consequences.

State sponsorship for these acts of psychological terrorism is also
indicated by duration; support for over six years for a team of three or
four people would be beyond the means and will of most private sources.
The viciousness of the slanders and personal denigration also points to
MI5; they traditionally "protect" the British state from politicians of the
wrong hue by character assassination, and in this case are using their
tried and tested methods to murder with words an enemy they have invented
for themselves.

And there are precedents. Diana and Hewitt were alleged to have been filmed
"at it" by an Army intelligence team which had operated in Northern
Ireland, these allegations were made by someone called Jones who had been
on the team. His statements were denied by the defence establishment who
tried to character-assassinate by describing him as the "Jones twins".
Funny how if you tell the truth, then you must be ill, isn't it? Thought
only communists behaved like that?

Hewitt later said that he'd been spoken to by someone in the army who
revealed the existence of videotapes of him and Diana, and that the tapes
would be published if any attempt was made by them to resume their
association.

436


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 15:11:15 GMT
From: MI5-Victim@mi5.gov.uk
Subject: MI5 Persecution: who knows about it?
Message-Id: <m06102816055165@4ax.com>

-=-=-=-=-=-=-=-=-=-=-=-=-
-= who knows about it? =-
-=-=-=-=-=-=-=-=-=-=-=-=-

Many people know, both in the establishment and media, and among the
general public. Despite an absence of its target from the UK for more than
two years, the echoes of paranoia can still be heard loud and clear from
across the water. When it started in 1990, the only people who knew were
those in BBC television who were spying on my home, and a few radio
broadcasters. There were a few cases of public harassment, but very little
compared to the situation that developed a couple of years later.

The list today includes BBC TV staff (newsreaders such as Martyn Lewis,
Michael Buerk, Nicholas Witchell), people from radio stations such as
Chris Tarrant of Capital and Radio 1 DJs, people in the print media, but
also many people in the general public. All united in a conspiracy which
breaks the laws which the UK does have regarding harassment, and all
completely uncaring for any semblance of decency or elementary respect
for individual rights.

The British police (obviously) do know the nature of the harassment and in
all probability the identity of those behind it. Some time ago I made a
complaint to my local police station in London, without positive result.
The UK police are failing in their duty to see the law enforced in not
checking the abuse.

434


-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: Tue, 28 Nov 2006 19:13:43 -0000
From: HaroldWho <hlarons@yahoo.com>
Subject: perl on Mac/OS X Tiger
Message-Id: <slrnemp2j7.ka.hlarons@Beagle.mylocal.net>

CPAN says that perl is standard on OS X, but the Apple site makes no mention
of perl being included with Tiger, the current flavor of OS X.

I'm thinking of getting a Mac, but I want perl on it. Am I looking at a
download and install?

HW
-- 
Powered by Slackware 10.2 Linux -- Kernel 2.6.13
News Reader slrn 0.9.8.1




------------------------------

Date: Tue, 28 Nov 2006 19:25:14 GMT
From: boyd <tbmoore9@verizon.net>
Subject: Re: perl on Mac/OS X Tiger
Message-Id: <tbmoore9-F6F9DE.14251328112006@news.verizon.net>

In article <slrnemp2j7.ka.hlarons@Beagle.mylocal.net>,
 HaroldWho <hlarons@yahoo.com> wrote:

> CPAN says that perl is standard on OS X, but the Apple site makes no mention
> of perl being included with Tiger, the current flavor of OS X.
> 
> I'm thinking of getting a Mac, but I want perl on it. Am I looking at a
> download and install?
> 
> HW

I searched the Unix apple support discussions, and 10.4 does include 
Perl.  

Boyd


------------------------------

Date: Tue, 28 Nov 2006 14:35:50 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: perl on Mac/OS X Tiger
Message-Id: <m2ac2bmkix.fsf@Sherm-Pendleys-Computer.local>

HaroldWho <hlarons@yahoo.com> writes:

> CPAN says that perl is standard on OS X, but the Apple site makes no mention
> of perl being included with Tiger, the current flavor of OS X.

The Apple site doesn't mention sed or grep either - it's not exactly aimed at
geeky audience. But don't worry - they're there. :-)

> I'm thinking of getting a Mac, but I want perl on it. Am I looking at a
> download and install?

Tiger ships with 5.8.6.

You'll need to install Xcode if you want to install modules though - You
won't need the IDE, but dev tools such as make, GCC, etc. are bundled with
the Xcode package and aren't installed by default. New Macs include an
Xcode installer out of the box, but it's not a bad idea to register for a
free ADC account at <http://connect.apple.com> to see if there's a newer
release available - it's a free (but huge) download.

sherm--

-- 
Web Hosting by West Virginians, for West Virginians: http://wv-www.net
Cocoa programming in Perl: http://camelbones.sourceforge.net


------------------------------

Date: 28 Nov 2006 11:41:45 -0800
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: perl on Mac/OS X Tiger
Message-Id: <863b831hqe.fsf@blue.stonehenge.com>

>>>>> "HaroldWho" == HaroldWho  <hlarons@yahoo.com> writes:

HaroldWho> CPAN says that perl is standard on OS X, but the Apple site makes no mention
HaroldWho> of perl being included with Tiger, the current flavor of OS X.

HaroldWho> I'm thinking of getting a Mac, but I want perl on it. Am I looking
HaroldWho> at a download and install?

It's on tiger, from the get-go.

Be sure you add the BSD SDK from the XCode disk if you want to add any modules
though.

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!

-- 
Posted via a free Usenet account from http://www.teranews.com



------------------------------

Date: 28 Nov 2006 12:43:22 -0800
From: "amerar@iwc.net" <amerar@iwc.net>
Subject: Perl/Mail Suggestion....
Message-Id: <1164746602.551025.93660@h54g2000cwb.googlegroups.com>

Hi all,

I've just built myself a new server and installed Linux.  I currently
have a mailserver rnning Red Hat 9.0 and I'm using Postifx.

My existing server runs just fine.  I want to bring my new server
online to test the mail portion without taking down my current server.

I have set up Squirrelmail and that seems to deliver mail just fine.
However, when I try and run a Perl script which uses the Net::SMTP
module, I receive this error:

"Can't call method "mail" on an undefined value at
/prod/scripts/send.pl line 208."

Here is a clip of my code:

         $smtp = Net::SMTP->new("nytelife");
         $smtp->mail("mail.chicagorsvp.com");
         $smtp->to($email);
         $smtp->data();

That is the code that currently runs on the Red Hat 9.0 existing
server.  I am wondering if this is a problem due to hostnames or
something.   I'm just lost and have no idea where to look.......

Can anyone help or offer a suggestion?

Thanks!



------------------------------

Date: 28 Nov 2006 12:58:10 -0800
From: "amerar@iwc.net" <amerar@iwc.net>
Subject: Re: Perl/Mail Suggestion....
Message-Id: <1164747490.432627.3260@l39g2000cwd.googlegroups.com>


amerar@iwc.net wrote:
> Hi all,
>
> I've just built myself a new server and installed Linux.  I currently
> have a mailserver rnning Red Hat 9.0 and I'm using Postifx.
>
> My existing server runs just fine.  I want to bring my new server
> online to test the mail portion without taking down my current server.
>
> I have set up Squirrelmail and that seems to deliver mail just fine.
> However, when I try and run a Perl script which uses the Net::SMTP
> module, I receive this error:
>
> "Can't call method "mail" on an undefined value at
> /prod/scripts/send.pl line 208."
>
> Here is a clip of my code:
>
>          $smtp = Net::SMTP->new("nytelife");
>          $smtp->mail("mail.chicagorsvp.com");
>          $smtp->to($email);
>          $smtp->data();
>
> That is the code that currently runs on the Red Hat 9.0 existing
> server.  I am wondering if this is a problem due to hostnames or
> something.   I'm just lost and have no idea where to look.......
>
> Can anyone help or offer a suggestion?
>
> Thanks!

I have another question:

In line #2:  $smtp->mail("mail.chicagorsvp.com");

Where is that mail server definition defined?  I'll need to change the
name on the new server so there is no conflict......

Thanks!



------------------------------

Date: Tue, 28 Nov 2006 16:11:49 -0600
From: Sharif Islam <mislam@spam.uiuc.edu>
Subject: Re: Perl/Mail Suggestion....
Message-Id: <ekic75$c0q$2@news.ks.uiuc.edu>

amerar@iwc.net wrote:
> Hi all,
> 
> I've just built myself a new server and installed Linux.  I currently
> have a mailserver rnning Red Hat 9.0 and I'm using Postifx.
> 
> My existing server runs just fine.  I want to bring my new server
> online to test the mail portion without taking down my current server.
> 
> I have set up Squirrelmail and that seems to deliver mail just fine.
> However, when I try and run a Perl script which uses the Net::SMTP
> module, I receive this error:
> 
> "Can't call method "mail" on an undefined value at
> /prod/scripts/send.pl line 208."
> 
> Here is a clip of my code:
> 
>          $smtp = Net::SMTP->new("nytelife");
>          $smtp->mail("mail.chicagorsvp.com");
>          $smtp->to($email);
>          $smtp->data();

can you make sure you are able to connect to the smtp server?
Try this:

$smtp = Net::SMTP->new("nytelife"); # connect to an SMTP server
if (defined $smtp)
{

$smtp->mail("mail.chicagorsvp.com");
$smtp->to($email);
$smtp->data();
}
else {
print "Cannot to connect to nytelife";
exit;
}

--sharif


------------------------------

Date: 28 Nov 2006 08:31:34 -0800
From: klestes@gmail.com
Subject: Perlthrtut threadqueue example :  possibly incorrect ?
Message-Id: <1164731494.417912.321950@n67g2000cwd.googlegroups.com>

Messing with the example relating to the Thread::Queue, which is :

    use threads;
    use threads::shared;
    use Thread::Queue;

    my $DataQueue = new Thread::Queue;
        $thr = async {
            while ($DataElement = $DataQueue->dequeue) {
                print "Popped $DataElement off the queue\n";
            }
        };

    $DataQueue->enqueue(12);
    $DataQueue->enqueue("A", "B", "C");
    $DataQueue->enqueue(\$thr);
    sleep 10;
    $DataQueue->enqueue(undef);
    $thr->join;

And I get an "invalid value for shared scalar".  After further messing
around, discovered it works OK if I remove the following line:

    $DataQueue->enqueue(\$thr);


So my question is:  Wha ?


(Win32/ActiveState 5.8.7 in da house)



------------------------------

Date: 28 Nov 2006 16:47:08 GMT
From: xhoster@gmail.com
Subject: Re: Perlthrtut threadqueue example :  possibly incorrect ?
Message-Id: <20061128114842.947$e0@newsreader.com>

klestes@gmail.com wrote:
> Messing with the example relating to the Thread::Queue, which is :
>
>     use threads;
>     use threads::shared;
>     use Thread::Queue;
>
>     my $DataQueue = new Thread::Queue;
>         $thr = async {
>             while ($DataElement = $DataQueue->dequeue) {

They should probably check for definedness, not just for truth,
of the $DataElement.

>                 print "Popped $DataElement off the queue\n";
>             }
>         };
>
>     $DataQueue->enqueue(12);
>     $DataQueue->enqueue("A", "B", "C");
>     $DataQueue->enqueue(\$thr);
>     sleep 10;
>     $DataQueue->enqueue(undef);
>     $thr->join;
>
> And I get an "invalid value for shared scalar".  After further messing
> around, discovered it works OK if I remove the following line:
>
>     $DataQueue->enqueue(\$thr);
>
> So my question is:  Wha ?

That is a limitation of Thread::Queue.  I don't why they decided to
give an example of this limitation without stating that that is what they
were doing.  Thread::Queue::Any should circumvent this problem.

Xho

-- 
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service                        $9.95/Month 30GB


------------------------------

Date: 28 Nov 2006 08:14:43 -0800
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: regex matching exactly 10 digits
Message-Id: <1164730483.189487.19430@80g2000cwy.googlegroups.com>

John W. Krahn wrote:
> jtbutler78@comcast.net wrote:
> > I am having an issue trying to match exactly 10 digits.  I want to
> > append a '1' in front of 10 digit fax numbers.  Numbers longer than 10
> > digits leave alone.  I am using \d{10,10} match at least and at most 10
> > digits but it still appends a 1 to international numbers.  I am missing
> > something but I am not sure what.
> >
> > #strip out unneeded chars
> > $fax_num =~ s/[\s()-]//g;
> >
> > #append 1 to 10 digit fax number
> > $fax_num =~ s/(\d{10,10})/1$1/;
>
> It looks like that instead of appending a '1' you really want to prepend a
> '1'.  You could do it like this:
>
> $fax_num = "1$fax_num" if $fax_num =~ tr/0-9// == 10;
>

If we're presuming that the only thing in $fax_num is the fax number
itself, then there's no reason for any checking other than the lenth:

$faxnum = "1$fax_num" if length($faxnum) == 10;

Paul Lalli



------------------------------

Date: Tue, 28 Nov 2006 17:28:39 +0100
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: regex matching exactly 10 digits
Message-Id: <ekhrm1.uc.1@news.isolution.nl>

bugbear schreef:
> Paul Lalli wrote:
>> [attribution removed by bugbear]:

>>> #append 1 to 10 digit fax number
>>> $fax_num =~ s/(\d{10,10})/1$1/;
>>
>> You are missing the fact that a regexp doesn't care what *else* is in
>> the string.  You are checking only to see if the string *contains*
>> the pattern.  "At most" does not mean that the string cannot contain
>> more of that token.  It means that this particular piece of the
>> regexp will not match more than that many.  You need to explicitly
>> check that another digit neither precedes nor follows the ten that
>> you've found:
>
> Depending on the OP's data, the simpler match
>    /^\d{10,10}$/
> may serve.

echo 9876543210 | perl -wpe '
  s/^(?=[0-9]{10}$)/x/
'
x9876543210

-- 
Affijn, Ruud

"Gewoon is een tijger."



------------------------------

Date: 28 Nov 2006 10:51:23 -0800
From: "K.J. 44" <Holleran.Kevin@gmail.com>
Subject: Replacement in a string with a function call.
Message-Id: <1164739882.706664.311290@h54g2000cwb.googlegroups.com>

Hi,

What I want to do is search a string, find an IP Address, and replace
that with the DNS name.

$details[$i] =~ s/(\d+)(\.\d+)(\.\d+)(\.\d+):/&resolveDNS($1$2$3$4)/;

The string is named $details[$i] and resolveDNS is the function.  The
function itself works.  The IP Addresses I want to match are followed
by a colon and I do not want to match any other IP Addresses.

It is not making the subsitutions.  It simply substitutes
&resolveDNS(IPADDRESS) instead.

Is there a way to call the function to have it return the value that i
want replaced?

Thanks.



------------------------------

Date: Tue, 28 Nov 2006 20:31:47 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Replacement in a string with a function call.
Message-Id: <4t3h54F1201rmU1@mid.individual.net>

K.J. 44 wrote:
> What I want to do is search a string, find an IP Address, and replace
> that with the DNS name.
> 
> $details[$i] =~ s/(\d+)(\.\d+)(\.\d+)(\.\d+):/&resolveDNS($1$2$3$4)/;
------------------------------------------------^

Why the '&'?

Why aren't you using strictures?

Besides that, you need the /e modifier.

     perldoc perlre

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: Tue, 28 Nov 2006 20:40:14 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Replacement in a string with a function call.
Message-Id: <4t3hl0F125aftU1@mid.individual.net>

Gunnar Hjalmarsson wrote:
> Besides that, you need the /e modifier.
> 
>     perldoc perlre

A more adequate pointer would be:

     perldoc perlop
(the s/// operator)

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: 28 Nov 2006 12:43:52 -0800
From: "K.J. 44" <Holleran.Kevin@gmail.com>
Subject: Re: Replacement in a string with a function call.
Message-Id: <1164746631.999087.81570@j72g2000cwa.googlegroups.com>

That worked great!  THanks!

Gunnar Hjalmarsson wrote:
> Gunnar Hjalmarsson wrote:
> > Besides that, you need the /e modifier.
> >
> >     perldoc perlre
>
> A more adequate pointer would be:
>
>      perldoc perlop
> (the s/// operator)
>
> --
> Gunnar Hjalmarsson
> Email: http://www.gunnar.cc/cgi-bin/contact.pl



------------------------------

Date: 28 Nov 2006 10:44:55 -0800
From: huntingseasonson@gmail.com
Subject: Re: Validation with XSD using XML::LibXML::Schema, and XML::Validator::Schema
Message-Id: <1164739495.532560.240180@80g2000cwy.googlegroups.com>

Brian McCauley wrote:
> On Nov 28, 2:12 am, huntingseason...@gmail.com wrote:
> > Both XML::LibXML::Schema and  XML::Validator::Schema error when I
> > attempt to validate, yet the XML and XSD files appear to be perfectly
> > fine.
>
> > Both fXML and XSD files are quite long, but I will post if necessary.
>
> I can't really see how we can comment if you don't make them available
> to us.

Ok, the xml: http://huntingseasonson.com/TV.xml

and the xsd: http://huntingseasonson.com/TV.xsd

Thanks



------------------------------

Date: 28 Nov 2006 14:12:20 -0800
From: "Brian McCauley" <nobull67@gmail.com>
Subject: Re: Validation with XSD using XML::LibXML::Schema, and XML::Validator::Schema
Message-Id: <1164751940.916518.320020@80g2000cwy.googlegroups.com>


huntingseasonson@gmail.com wrote:
> Brian McCauley wrote:
> > On Nov 28, 2:12 am, huntingseason...@gmail.com wrote:
> > > Both XML::LibXML::Schema and  XML::Validator::Schema error when I
> > > attempt to validate, yet the XML and XSD files appear to be perfectly
> > > fine.
> >
> > > Both fXML and XSD files are quite long, but I will post if necessary.
> >
> > I can't really see how we can comment if you don't make them available
> > to us.
>
> Ok, the xml: http://huntingseasonson.com/TV.xml
>
> and the xsd: http://huntingseasonson.com/TV.xsd

I suspect  XML::LibXML::Schema may be getting confused by the explicit
empty namepace declaration.

<xs:schema xmlns="" xmlns:xs="http://www.w3.org/2001/XMLSchema"
xmlns:msdata="urn:schemas-microsoft-com:xml-msdata" id="package">

XML::Validator::Schema only supports a subset of XSD. I can't
immediately see what in your TV.xsd goes beyond what it supports. It
looks like it's mistaking getting confused here...

<xs:complexType>
<xs:simpleContent>
<xs:extension base="xs:string">
<xs:attribute name="type" use="required">
<xs:simpleType>

Looking in XML::Validator::Schema::Parser it seems not to consider the
possiblity that <xs:attribute> has content so it sees <xs:simpleType>
as being within the <xs:complexType>. (The <xs:simpleContent> and
<xs:extension> are handled as specialization of the <xs:complexType>).

I guess XML::Validator::Schema::Parser only supports named types for
attributes.



------------------------------

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc.  For subscription or unsubscription requests, send
#the single line:
#
#	subscribe perl-users
#or:
#	unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.  

NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice. 

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.

#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V10 Issue 10016
****************************************


home help back first fref pref prev next nref lref last post