X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Foverload.t;h=6dafa07576f78ec0c11c29401af6ae18f2bd6da1;hb=c1e8580e8ecd78fc1f67b0caa695b9884a700d93;hp=b12cf27623b4ad1b68706f8354853ee5344dd63c;hpb=2372186ae65ad0411bfab65604891fae243522b7;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/overload.t b/lib/overload.t
index b12cf27..6dafa07 100644
--- a/lib/overload.t
+++ b/lib/overload.t
@@ -1232,7 +1232,6 @@ foreach my $op (qw(<=> == != < <= > >=)) {
     use overload '""' => sub {"CLiK KLAK"};
 
     package Ksshfwoom;
-    use overload '""' => sub {"OOOKK AWK"};
 
     package main;
 
@@ -1248,8 +1247,8 @@ foreach my $op (qw(<=> == != < <= > >=)) {
 
     bless $obj, 'Ksshfwoom';
 
-    is ($obj, "OOOKK AWK");
-    is ($ref, "OOOKK AWK");
+    like ($obj, qr/^Ksshfwoom=/);
+    like ($ref, qr/^Ksshfwoom=/);
 
     undef $obj;
     is ($ref, undef);