my $result = $widget eq "It's a widget!";
print "# result of comparison: ", ($result?'true':'false'), "\n";