c:\@Work\Perl\monks>perl -wMstrict -le "use Data::Dump qw(dd); ;; my $value; ;; my $alice = 'alice'; my $bob = 'alice'; ;; $value = $alice eq $bob; dd 'result of evaluating a comparison that is true', $value; ;; $alice = 'alice'; $bob = 'bob'; ;; $value = $alice eq $bob; dd 'result of evaluating a comparison that is false', $value; " ("result of evaluating a comparison that is true", 1) ("result of evaluating a comparison that is false", "")