Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
print Dumper \@atoms;
print Dumper \@atoms_snapshot;
ok(eq_set(\@atoms, \@atoms_snapshot), "Basic remove dups check");

Select or download this

1..2
ok 1 - use Atoms;
...
not ok 2 - Basic remove dups check
#     Failed test (./fake at line 22)
# Looks like you failed 1 tests of 2.