[95B] (foo)if(bar==baz) => (bar-baz)||(foo)

 {print"$t\n"if$t->day_of_week*$t->day==65}
 
 {$t->day_of_week*$t->day-65||print"$t\n"}

Perl / C なんかでよくある変形