in reply to Is there an andand for Perl like there is in Ruby?

print +($shop->ShopperDueDate || "") && ($shop->day_name . "\n");

[download]

In Section Seekers of Perl Wisdom