From fe3079813a2f08204ed96a614faf9e57693108d1 Mon Sep 17 00:00:00 2001
From: Gurusamy Sarathy <gsar@cpan.org>
Date: Mon, 1 May 2000 08:39:18 +0000
Subject: introduce @LAST_MATCH_START and @LAST_MATCH_END, English aliases for
 @- and @+ (from Johan Vromans)

p4raw-id: //depot/perl@6030
---
 lib/English.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'lib')

diff --git a/lib/English.pm b/lib/English.pm
index f6e3ec0021..f38c313beb 100644
--- a/lib/English.pm
+++ b/lib/English.pm
@@ -98,6 +98,8 @@ sub import {
 	*OSNAME
 	*LAST_REGEXP_CODE_RESULT
 	*EXCEPTIONS_BEING_CAUGHT
+	@LAST_MATCH_START
+	@LAST_MATCH_END
 );
 
 # The ground of all being. @ARG is deprecated (5.005 makes @_ lexical)
@@ -110,6 +112,8 @@ sub import {
 	*PREMATCH				= *`	;
 	*POSTMATCH				= *'	;
 	*LAST_PAREN_MATCH			= *+	;
+	*LAST_MATCH_START			= *-{ARRAY} ;
+	*LAST_MATCH_END				= *+{ARRAY} ;
 
 # Input.
 
-- 
cgit v1.2.1