I got stuck with a problem that i created in the process of debugging something else .
I replaced sub case_f { catfile( $TOP_DIR, $_[0], $_[1] ); }
with sub case_f { $_ = catfile( $TOP_DIR, $_[0], $_[1] ); print "The path is $_ "; $_ }
and it broke the code , whereas the following works
sub case_f { my $boink = catfile( $TOP_DIR, $_[0], $_[1] ); print "The path is $boink "; $boink }
and it broke the code . Can someone explain ?