committed patch for bug SWIG-1937031 ; moved operator_overload_break back to working tests

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10367 626c5289-ae23-0410-ae9c-e8d60b6d4f22

Source/Modules/perl5.cxx

@@ -1,3 +1,7 @@
+/* -*- mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-
+ *  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
+ */
+
 /* ----------------------------------------------------------------------------
  * See the LICENSE file for information on copyright, usage and redistribution
  * of SWIG, and the README file for authors - http://www.swig.org/release.html.
@@ -1200,6 +1204,8 @@ public:
 	    fprintf(stderr,"Unknown operator: %s\n", name);
 	  }
 	}
+	Printv(pm, tab4,
+               "\"=\" => sub { my $class = ref($_[0]); $class->new($_[0]) },\n", NIL);
 	Printv(pm, tab4, "\"fallback\" => 1;\n", NIL);
       }
       // make use strict happy