Re: Not Matt's Scripts

2001-05-01 Thread Mark Fowler

On 30 Apr 2001, Dave Hodgkinson wrote:

 I've got someone needing a form to mail script. Where's ours[0]?

According to my records, Dave C was doing it.

Dave?

Later.

Mark.

-- 
 mark typed this




Re: Not Matt's Scripts

2001-05-01 Thread Dave Hodgkinson

Mark Fowler [EMAIL PROTECTED] writes:

 On 30 Apr 2001, Dave Hodgkinson wrote:
 
  I've got someone needing a form to mail script. Where's ours[0]?
 
 According to my records, Dave C was doing it.

FWIW I had a look at Soupermail. A better effort but could still do
with work.

-- 
Dave Hodgkinson, http://www.hodgkinson.org
Editor-in-chief, The Highway Star   http://www.deep-purple.com
  Interim CTO, web server farms, technical strategy
   



Re: Mailbox power ..

2001-05-01 Thread Jonathan Peterson

Dave Hodgkinson wrote:

  Sure, but I'll eat my hat if I can buy one on its own on TCR. It really
  is too bad that CEX don't have a decent cable selection, since you can
  get everything else from them.
 
 Nah, blag one...I'm sure there are people round here with spares...
 

*cough* So... anyone got a spare one of these (RJ45 - DB9 serial i.e.
cisco or netra t1 console cable)? And if so can I borrow it for a day?
Mail me off list if you can help..

Cheers,

Jon

-- 
Jonathan Peterson
Technical Manager, Unified Ltd, 020 7383 6092
[EMAIL PROTECTED]



Funny thing

2001-05-01 Thread Jonathan Peterson

I'm sure there's a good reason for it, but the code below gives a syntax
error. I think it ought to do what it looks like it ought to do. What's
the reason?

$foo = 'bar';
$foo =~ /bar/ and {print yes; print yes again;}

gives: syntax error at test line 2, near ; print

$foo = 'bar';
$foo =~ /bar/ and {print yes;}

gives: syntax error at test line 2, near ;}

$foo = 'bar';
$foo =~ /bar/ and {print yes}

prints yes as expected.

What's going on, eh?

-- 
Jonathan Peterson
Technical Manager, Unified Ltd, 020 7383 6092
[EMAIL PROTECTED]



Re: Funny thing

2001-05-01 Thread Jonathan Stowe

On Tue, 1 May 2001, Jonathan Peterson wrote:

 I'm sure there's a good reason for it, but the code below gives a syntax
 error. I think it ought to do what it looks like it ought to do. What's
 the reason?

 $foo = 'bar';
 $foo =~ /bar/ and {print yes; print yes again;}


 ... and do { print ... };

 gives: syntax error at test line 2, near ; print

 $foo = 'bar';
 $foo =~ /bar/ and {print yes;}

 gives: syntax error at test line 2, near ;}


.. and do { print .. };

It is the semicolon that fucks this one.

 $foo = 'bar';
 $foo =~ /bar/ and {print yes}

 prints yes as expected.

 What's going on, eh?


You missed the :

Useless use of scalar ref constructor in void context at foo.pl line 2.
Odd number of elements in hash assignment at foo.pl line 2.

printing yes is a side affect :)

It thinks that it is a hash ref in a void where the first and only element
is the result of 'print yes' er 1 I think :)

/J\




Re: Funny thing

2001-05-01 Thread Jonathan Peterson

  $foo = 'bar';
  $foo =~ /bar/ and {print yes; print yes again;}
 
 
  ... and do { print ... };

I forgot about do. doh.

Ta.

-- 
Jonathan Peterson
Technical Manager, Unified Ltd, 020 7383 6092
[EMAIL PROTECTED]



Re: Not Matt's Scripts

2001-05-01 Thread Dave Cross

At 19:53 30/04/2001, Dave Hodgkinson wrote:

I've got someone needing a form to mail script. Where's ours[0]?

Ta,

Dave

[0] Oh, all right, yours since I bottled out.

Current version is at 
http://www.dave.org.uk/scripts/notmatt/formmail.pl.txt but it needs some 
tightening up and peer review.

Dave...



-- 
http://www.dave.org.uk  SMS: [EMAIL PROTECTED]

plugData Munging with Perl http://www.manning.com/cross//plug