my $UNIT_DIR = '/home/vize/units';

# Get all units in $UNIT_DIR
foreach my $moving_code_dir ( <$UNIT_DIR/*/moving_code_*> ) {
    my $moving_code = ( split '/', $moving_code_dir )[ -1 ];
    if ( $moving_code_dir ) {
        print "$unit good\n";
    }
    else {
        print "$unit bad\n";
    }
}