diff --git a/hooks/arch_wireless b/hooks/arch_wireless
deleted file mode 100644
index a7e86c430..000000000
--- a/hooks/arch_wireless
+++ /dev/null
@@ -1,5 +0,0 @@
-run_hook ()
-{
-    #fix perl symlink
-    ln -s /usr/lib/perl5/current /usr/lib/perl5/5.8.8
-}
diff --git a/install/arch_wireless b/install/arch_wireless
index 3678d57a7..812dfe156 100644
--- a/install/arch_wireless
+++ b/install/arch_wireless
@@ -6,8 +6,7 @@ install ()
 
     BINARIES="iwconfig iwevent iwgetid iwlist iwpriv iwspy ifrename bcm43xx-fwcutter wpa_cli wpa_passphrase wpa_supplicant 80211debug 80211stats ath_info athchans athctrl athdebug athkey athstats madwifi-unload wlanconfig nwepgen prism2dl wlancfg wlanctl-ng loadndisdriver perl"
     FILES=""
-    ### remove with perl 5.10!
-    SCRIPT="arch_wireless"
+    SCRIPT=""
     add_file "/etc/archboot/wireless/etc/conf.d/wireless" "/etc/conf.d/wireless"
     add_file "/etc/archboot/wireless/etc/wpa_supplicant.conf" "/etc/wpa_supplicant.conf"
     # add ralink firmware files
@@ -29,64 +28,33 @@ install ()
     done
     # add ndiswrapper support
     add_file "/usr/sbin/ndiswrapper"
-### new perl scheme! disabled until it moves in!
-#    add_file "/usr/share/perl5/core_perl/File/Path.pm"
-#    add_file "/usr/share/perl5/core_perl/File/Spec/Unix.pm"
-#    add_file "/usr/share/perl5/core_perl/File/Spec.pm"
-#    add_file "/usr/share/perl5/core_perl/File/Copy.pm"
-#    add_file "/usr/share/perl5/core_perl/File/Basename.pm"
-#    add_file "/usr/share/perl5/core_perl/Exporter/Heavy.pm"
-#    add_file "/usr/share/perl5/core_perl/AutoLoader.pm"
-#    add_file "/usr/share/perl5/core_perl/Carp.pm"
-#    add_file "/usr/share/perl5/core_perl/Carp/Heavy.pm"
-#    add_file "/usr/share/perl5/core_perl/warnings.pm"
-#    add_file "/usr/share/perl5/core_perl/warnings/register.pm"
-#    add_file "/usr/share/perl5/core_perl/vars.pm"
-#    add_file "/usr/share/perl5/core_perl/Exporter.pm"
-#    add_file "/usr/share/perl5/core_perl/strict.pm"
-#    add_file "/usr/lib/perl5/core_perl/Cwd.pm"
-#    add_file "/usr/lib/perl5/core_perl/auto/Cwd/Cwd.bs"
-#    add_file "/usr/lib/perl5/core_perl/auto/Cwd/Cwd.so"
-#    add_file "/usr/lib/perl5/core_perl/auto/Fcntl/Fcntl.bs"
-#    add_file "/usr/lib/perl5/core_perl/auto/Fcntl/Fcntl.so"
-#    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/dl_find_symbol_anywhere.al"
-#    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/dl_expandspec.al"
-#    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/autosplit.ix"
-#    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/dl_findfile.al"
-#    add_file "/usr/lib/perl5/core_perl/Config.pm"
-#    add_file "/usr/lib/perl5/core_perl/DynaLoader.pm"
-#    add_file "/usr/lib/perl5/core_perl/XSLoader.pm"
-#    add_file "/usr/lib/perl5/core_perl/Fcntl.pm"
-### old scheme can be removed when perl moves in!
-    add_file "/usr/lib/perl5/current/File/Path.pm"
-    add_file "/usr/lib/perl5/current/File/Spec/Unix.pm"
-    add_file "/usr/lib/perl5/current/File/Spec.pm"
-    add_file "/usr/lib/perl5/current/File/Copy.pm"
-    add_file "/usr/lib/perl5/current/File/Basename.pm"
-    add_file "/usr/lib/perl5/current/Exporter/Heavy.pm"
-    add_file "/usr/lib/perl5/current/AutoLoader.pm"
-    add_file "/usr/lib/perl5/current/Carp.pm"
-    add_file "/usr/lib/perl5/current/Carp/Heavy.pm"
-    add_file "/usr/lib/perl5/current/warnings.pm"
-    add_file "/usr/lib/perl5/current/warnings/register.pm"
-    add_file "/usr/lib/perl5/current/vars.pm"
-    add_file "/usr/lib/perl5/current/Exporter.pm"
-    add_file "/usr/lib/perl5/current/strict.pm"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/Cwd.pm"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/Cwd/Cwd.bs"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/Cwd/Cwd.so"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/Fcntl/Fcntl.bs"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/Fcntl/Fcntl.so"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/DynaLoader/dl_find_symbol_anywhere.al"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/DynaLoader/dl_expandspec.al"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/DynaLoader/extralibs.ld"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/DynaLoader/autosplit.ix"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/DynaLoader/DynaLoader.a"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/auto/DynaLoader/dl_findfile.al"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/Config.pm"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/DynaLoader.pm"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/XSLoader.pm"
-    add_file "/usr/lib/perl5/current/$(uname -m)-linux-thread-multi/Fcntl.pm"
+    add_file "/usr/share/perl5/core_perl/File/Path.pm"
+    add_file "/usr/share/perl5/core_perl/File/Spec/Unix.pm"
+    add_file "/usr/share/perl5/core_perl/File/Spec.pm"
+    add_file "/usr/share/perl5/core_perl/File/Copy.pm"
+    add_file "/usr/share/perl5/core_perl/File/Basename.pm"
+    add_file "/usr/share/perl5/core_perl/Exporter/Heavy.pm"
+    add_file "/usr/share/perl5/core_perl/AutoLoader.pm"
+    add_file "/usr/share/perl5/core_perl/Carp.pm"
+    add_file "/usr/share/perl5/core_perl/Carp/Heavy.pm"
+    add_file "/usr/share/perl5/core_perl/warnings.pm"
+    add_file "/usr/share/perl5/core_perl/warnings/register.pm"
+    add_file "/usr/share/perl5/core_perl/vars.pm"
+    add_file "/usr/share/perl5/core_perl/Exporter.pm"
+    add_file "/usr/share/perl5/core_perl/strict.pm"
+    add_file "/usr/lib/perl5/core_perl/Cwd.pm"
+    add_file "/usr/lib/perl5/core_perl/auto/Cwd/Cwd.bs"
+    add_file "/usr/lib/perl5/core_perl/auto/Cwd/Cwd.so"
+    add_file "/usr/lib/perl5/core_perl/auto/Fcntl/Fcntl.bs"
+    add_file "/usr/lib/perl5/core_perl/auto/Fcntl/Fcntl.so"
+    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/dl_find_symbol_anywhere.al"
+    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/dl_expandspec.al"
+    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/autosplit.ix"
+    add_file "/usr/lib/perl5/core_perl/auto/DynaLoader/dl_findfile.al"
+    add_file "/usr/lib/perl5/core_perl/Config.pm"
+    add_file "/usr/lib/perl5/core_perl/DynaLoader.pm"
+    add_file "/usr/lib/perl5/core_perl/XSLoader.pm"
+    add_file "/usr/lib/perl5/core_perl/Fcntl.pm"
 }
 
 help ()