From owner-freebsd-questions@FreeBSD.ORG  Fri Jun 18 20:34:44 2004
Return-Path: <owner-freebsd-questions@FreeBSD.ORG>
Delivered-To: freebsd-questions@freebsd.org
Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125])
	by hub.freebsd.org (Postfix) with ESMTP id 9B00916A4D2
	for <freebsd-questions@FreeBSD.ORG>;
	Fri, 18 Jun 2004 20:34:44 +0000 (GMT)
Received: from mta10.adelphia.net (mta10.adelphia.net [68.168.78.202])
	by mx1.FreeBSD.org (Postfix) with ESMTP id 4785F43D1D
	for <freebsd-questions@FreeBSD.ORG>;
	Fri, 18 Jun 2004 20:34:44 +0000 (GMT)
	(envelope-from Barbish3@adelphia.net)
Received: from barbish ([67.20.101.71]) by mta10.adelphia.net
          (InterMail vM.5.01.06.08 201-253-122-130-108-20031117) with SMTP
          id <20040618203438.BUWO18421.mta10.adelphia.net@barbish>
          for <freebsd-questions@FreeBSD.ORG>;
          Fri, 18 Jun 2004 16:34:38 -0400
From: "JJB" <Barbish3@adelphia.net>
To: "freebsd-questions@FreeBSD. ORG" <freebsd-questions@FreeBSD.ORG>
Date: Fri, 18 Jun 2004 16:34:38 -0400
Message-ID: <MIEPLLIBMLEEABPDBIEGIEDAGDAA.Barbish3@adelphia.net>
MIME-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook IMO, Build 9.0.6604 (9.0.2911.0)
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1409
Subject: perl ?
X-BeenThere: freebsd-questions@freebsd.org
X-Mailman-Version: 2.1.1
Precedence: list
Reply-To: Barbish3@adelphia.net
List-Id: User questions <freebsd-questions.freebsd.org>
List-Unsubscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-questions>,
	<mailto:freebsd-questions-request@freebsd.org?subject=unsubscribe>
List-Archive: <http://lists.freebsd.org/pipermail/freebsd-questions>
List-Post: <mailto:freebsd-questions@freebsd.org>
List-Help: <mailto:freebsd-questions-request@freebsd.org?subject=help>
List-Subscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-questions>,
	<mailto:freebsd-questions-request@freebsd.org?subject=subscribe>
X-List-Received-Date: Fri, 18 Jun 2004 20:34:44 -0000

I have $email field that sometimes may not end with alpha character.

How would I code    if  (last position of $email != alpha) { replace
last pos of $email with blank }

Or any other coding method to strip off non alpha from $email field
if present.

Thanks