== → === in Bag.pod

`==` is numeric comparison. `===` does what we want here.

lib/Bag.pod

@@ -8,7 +8,7 @@ An immutable collection of weighted values. These weights are always
 integers, and can be accessed with the C<{ }> postcircumfix. For a
 mutable collection of weighted values, see L<BagHash>.
 
-    bag('a', 'b', 'c', 'a', 'd', 'a')<a> == 3
+    bag('a', 'b', 'c', 'a', 'd', 'a')<a> === 3
 
 =head1 Operators
 
@@ -27,7 +27,7 @@ C<Baggy>, it creates a new C<Bag> that contains all the elements of the
 arguments, each weighed by the highest weight that appeared for that
 element.
 
-    bag(<a a b c a>) (|) bag(<a a b c c>) == bag(<a a a b c c>)
+    bag(<a a b c a>) (|) bag(<a a b c c>) === bag(<a a a b c c>)
 
 =head2 infix ∪
 
@@ -44,7 +44,7 @@ are C<Baggy>, this creates a new C<Bag> that contains only the elements
 that all of the arguments contain, each weighted the max weight all of
 the arguments share for that element.
 
-    bag(<a a b c a>) (&) bag(<a a b c c>) == bag(<a a b c>)
+    bag(<a a b c a>) (&) bag(<a a b c c>) === bag(<a a b c>)
 
 =head2 infix ∩
 
@@ -76,7 +76,7 @@ Returns a C<Bag> that contains each element of the arguments with the
 weights of the element across the arguments multiplied together to get
 the new weight.
 
-    bag(<a a b c a d>) (.) bag(<a a b c c>) == bag(<a a a a a a b c c>)
+    bag(<a a b c a d>) (.) bag(<a a b c c>) === bag(<a a a a a a b c c>)
 
 =head2 infix ⊍
 
@@ -92,7 +92,7 @@ Returns a C<Bag> that contains each element of the arguments with the
 weights of the element across the arguments added together to get
 the new weight.
 
-    bag(<a a b c a d>) (.) bag(<a a b c c>) == bag(<a a a a a b b c c c d>)
+    bag(<a a b c a d>) (.) bag(<a a b c c>) === bag(<a a a a a b b c c c d>)
 
 
 =head2 infix ⊎