curly braces

[Silvio Luis Leite Santana]

Please
Why does code 1 work, but code 2 doesn't?
(the diference is the ; after print)
After all, is it posible or not to put a block
in place of a expression?
Thanks in advance
Silvio

CODE 1 - WORK 

$bissexto = <STDIN>;
chop($bissexto);
$bissexto and { print "OK\n" };
print "end\n";


CODE 2 - DOESN'T WORK
(should it work, I'd wish to put more
than one command inside the curly braces)

$bissexto = <STDIN>;
chop($bissexto);
$bissexto and { print "OK\n"; };
print "end\n";