{
	no strict;
	map { print $_ $log } (STDOUT, R);
}

$foo = "bar"; # Error! here we're re-using string