$ perl -MO=Deparse,-p -e 'next unless $cell'
($cell or (next));