Давайте я разовью вашу мысль... В 95% случаев у вас будет что-то типа if(win()){ use Win; } и т.д. Теперь давайте вынесем это в модуль, который сам это будет писать, так как программисты ленивы. А теперь давайте сделаем еще один шаг и пусть Перл сам всегда будет подключать этот модуль, так как без него Перл не работает. Бинго. Круг замкнулся. Странно что надо это рассказывать, правда.