open (my $i, "+<", $$name) or warn "Failed to open '$$name': $!";   ### FAILS HERE ###