<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns="http://www.w3.org/TR/REC-html40" xmlns:v =
"urn:schemas-microsoft-com:vml" xmlns:o =
"urn:schemas-microsoft-com:office:office" xmlns:w =
"urn:schemas-microsoft-com:office:word" xmlns:m =
"http://schemas.microsoft.com/office/2004/12/omml"><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<META content="MSHTML 6.00.6000.16735" name=GENERATOR>
<STYLE>@font-face {
font-family: Cambria Math;
}
@font-face {
font-family: Calibri;
}
@page Section1 {size: 8.5in 11.0in; margin: 1.0in 1.0in 1.0in 1.0in; }
P.MsoNormal {
FONT-SIZE: 11pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Calibri","sans-serif"
}
LI.MsoNormal {
FONT-SIZE: 11pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Calibri","sans-serif"
}
DIV.MsoNormal {
FONT-SIZE: 11pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Calibri","sans-serif"
}
A:link {
COLOR: blue; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.MsoHyperlink {
COLOR: blue; TEXT-DECORATION: underline; mso-style-priority: 99
}
A:visited {
COLOR: purple; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.MsoHyperlinkFollowed {
COLOR: purple; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.EmailStyle17 {
COLOR: windowtext; FONT-FAMILY: "Calibri","sans-serif"; mso-style-type: personal-compose
}
.MsoChpDefault {
mso-style-type: export-only
}
DIV.Section1 {
page: Section1
}
</STYLE>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></HEAD>
<BODY lang=EN-US vLink=purple link=blue>
<DIV dir=ltr align=left><SPAN class=362230914-04112008><FONT face=Arial
color=#0000ff size=2>Stephen</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=362230914-04112008><FONT face=Arial
color=#0000ff size=2></FONT></SPAN> </DIV>
<DIV dir=ltr align=left><SPAN class=362230914-04112008><FONT face=Arial
color=#0000ff size=2>what ware you trying to achieve here? If you want to know
if the end email address exists before accepting the email in the incoming
sendmail then sendmail Sender Address Verification (<A
href="http://smfs.sourceforge.net/smf-sav.html">http://smfs.sourceforge.net/smf-sav.html</A>)
will do this for you..</FONT></SPAN></DIV><!-- Converted from text/plain format -->
<P><FONT size=2>--<BR>Martin Hepworth<BR>Snr Systems Administrator<BR>Solid
State Logic<BR>Tel: +44 (0)1865 842300</FONT> </P>
<DIV> </DIV><BR>
<BLOCKQUOTE dir=ltr
style="PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #0000ff 2px solid; MARGIN-RIGHT: 0px">
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left>
<HR tabIndex=-1>
<FONT face=Tahoma size=2><B>From:</B>
mailscanner-bounces@lists.mailscanner.info
[mailto:mailscanner-bounces@lists.mailscanner.info] <B>On Behalf Of </B>Steven
Andrews<BR><B>Sent:</B> 04 November 2008 13:58<BR><B>To:</B> MailScanner
discussion<BR><B>Subject:</B> sendmail to exchange w/ldap problem slightly
OT<BR></FONT><BR></DIV>
<DIV></DIV>
<DIV class=Section1>
<P class=MsoNormal>I’ve been using a hunk of code to have MS/Sendmail query
exchange 2000/2003 boxes for some time with no problems. Today, I’m
setting up a nice little dell R200 and so I had to use Centos4.7 over my
default 4.3 to get sata support. <o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>Any help, much appreciated…<o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>When I run the code, I get this silliness:<o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>[root@spamfilter mail]# ./sendmail-ldap.sh<o:p></o:p></P>
<P class=MsoNormal>Name "main::EMAILS" used only once: possible typo at
./sendmail-ldap.sh line 57, <DATA> line 275.<o:p></o:p></P>
<P class=MsoNormal>Name "main::DOMAINS" used only once: possible typo at
./sendmail-ldap.sh line 60, <DATA> line 275.<o:p></o:p></P>
<P class=MsoNormal>starting ./sendmail-ldap.sh at Tue Nov 4 08:55:00 EST
2008<o:p></o:p></P>
<P class=MsoNormal>Undefined subroutine &main::extract_emails called at
./sendmail-ldap.sh line 51, <DATA> line 466.<o:p></o:p></P>
<P class=MsoNormal>[root@spamfilter mail]#<o:p></o:p></P>
<P class=MsoNormal> <o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal>Code here:<o:p></o:p></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#!/usr/bin/perl
-w<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">use
strict;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">use
Net::LDAP;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">print "starting $0 at ",
`date`;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$debug = 0;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
%mails = ();<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$hostname = `hostname -f`;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">chomp
$hostname;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
%domains = ($hostname => 1);<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$dir = "/etc/mail";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$emails_file = "$dir/temp-emails";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$domains_file = "$dir/temp-domains";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$access_file = "$dir/access";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
@prefixes = ("postmaster", "abuse", "root");<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
@servers =<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">(
"mail.boogidy.com"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">);<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">sub
extract_emails($);<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$ldap = undef;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">my
$mesg = undef;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">for my $server
(@servers)<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">{
print STDERR "Connecting to server $server...\n" if
$debug;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
$ldap = Net::LDAP->new( $server ) and last;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">}<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">$ldap or die "Unable to
connect to any LDAP servers.";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">print STDERR "Binding...\n"
if $debug;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">$mesg =
$ldap->bind(<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
dn => 'BOOGIDY\Administrator',<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
password => 'redacted'<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">)
or die "Could not bind LDAP: $@";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">$mesg->code and die
$mesg->error;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">print STDERR
"Searching...\n" if $debug;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">$mesg =
$ldap->search(<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
base => "dc=boogidy,dc=local",<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
filter =>
"(|(objectClass=publicFolder)(&(sAMAccountName=*)(mail=*)))"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">);<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">print STDERR "Checking
code...\n" if $debug;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">$mesg->code and die
$mesg->error;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">extract_emails($mesg);<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">print STDERR
"Unbinding...\n" if $debug;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">$mesg =
$ldap->unbind; # take down session<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">open EMAILS, ">
$emails_file"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
or die("Could not open > $emails_file\n$!");<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">open DOMAINS, ">
$domains_file"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
or die("Could not open > $domains_file\n$!");<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">open ACCESS, ">
$access_file"<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">
or die("Could not open > $access_file\n$!");<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">print ACCESS <<
"END";<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">##############################################################<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
This access database is generated by $0<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
This is regenerated by a cron job<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
Any change you make will be wiped out!<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">##############################################################<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
Check the /usr/share/doc/sendmail/README.cf file for a
description<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
of the format of this file. (search for access_db in that
file)<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
The /usr/share/doc/sendmail/README.cf is part of the
sendmail-doc<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
package.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">#
by default we allow relaying from localhost...<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">Connect:localhost
RELAY<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">Connect:127.0.0.1
RELAY<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">GreetPause:127.0.0.1
0<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">ClientConn:127.0.0.1
0<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">ClientConn:
10<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: 'Courier New'">END</SPAN><o:p></o:p></P>
<P class=MsoNormal><o:p> </o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><B><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">Steven R.
Andrews</SPAN></B><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">,
President</SPAN><SPAN
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman','serif'">
<BR></SPAN><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">Andrews Companies
Incorporated</SPAN><SPAN
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman','serif'">
<BR></SPAN><I><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">Small Business
Information Technology Consultants</SPAN></I><SPAN
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman','serif'">
<BR></SPAN><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">sandrews@andrewscompanies.com</SPAN><SPAN
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman','serif'">
<BR></SPAN><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">Phone:
317.536.1807</SPAN><SPAN
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman','serif'"><o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial','sans-serif'">"If your only tool
is a hammer, every problem looks like a nail."</SPAN><SPAN
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman','serif'">
</SPAN><o:p></o:p></P></DIV></BLOCKQUOTE><font size="1"><br />**********************************************************************
<br />Confidentiality : This e-mail and any attachments are intended for the
<br />addressee only and may be confidential. If they come to you in error
<br />you must take no action based on them, nor must you copy or show them
<br />to anyone. Please advise the sender by replying to this e-mail
<br />immediately and then delete the original from your computer.
<br />Opinion : Any opinions expressed in this e-mail are entirely those of
<br />the author and unless specifically stated to the contrary, are not
<br />necessarily those of the author's employer.
<br />Security Warning : Internet e-mail is not necessarily a secure
<br />communications medium and can be subject to data corruption. We advise
<br />that you consider this fact when e-mailing us.
<br />Viruses : We have taken steps to ensure that this e-mail and any
<br />attachments are free from known viruses but in keeping with good
<br />computing practice, you should ensure that they are virus free.
<br />
<br />Red Lion 49 Ltd T/A Solid State Logic
<br />Registered as a limited company in England and Wales
<br />(Company No:5362730)
<br />Registered Office: 25 Spring Hill Road, Begbroke, Oxford OX5 1RU,
<br />United Kingdom
<br />**********************************************************************</font>
</BODY></HTML>