my $cr1 = sub {
 $foo = $bar * $baz;
}

my $cr2 = sub {
 $foo = $bar * $baz;
}