#98037 +
(142)
*** sonic_1 ([email protected]) has joined channel #perl <sonic_1> can someone tell me whats wrong with this script? <sonic_1> #!/usr/bin/perl <sonic_1> for $x in 'ls --width=1'; <sonic_1> do 'mv $x ~$x/Mailbox;chown $x.mail ~$x/Mailbox'; <sonic_1> fi