but I have uses perl -w。 any other problem ? -----邮件原件----- 发件人: Dermot [mailto:paik...@googlemail.com] 发送时间: 2009年11月17日 19:53 收件人: beginners@perl.org 主题: Re: mkdir in the mounted partition,please help me,thanks
2009/11/17 gaochong <zjgaoch...@gmail.com>: > #!/usr/bin/perl -w > > > > #Auther:gaochong > > > > use strict; > > > > my @list = (3 .. 9); > > my @FA=("FA00000001".."FA00002000"); > > sub mk_fa { > > my ($f) = @_; > > foreach my $p (@list) { > > mkdir "/data$p/NRU/$f",0755 or warn "mkdir /data$p/NRU/$f > err:$!"; You should "use warnings". Are you getting a warning from this line? What dies $! say. There should be getting an error message and that will tell you exactly what the problem is. 10/1 says it's file permissions. Dp. -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/ -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/