my $tools = join "\n", map "$_ = $mm_w32->{ $_ }"
=> qw(CHMOD CP LD MV NOOP RM_F RM_RF TEST_F TOUCH UMASK_NULL DEV_NULL);
like( $mm_w32->tools_other(),
my $tools = join "\n", map "$_ = $mm_w32->{ $_ }"
=> qw(CHMOD CP LD MV NOOP RM_F RM_RF TEST_F TOUCH UMASK_NULL DEV_NULL);
like( $mm_w32->tools_other(),