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/


Reply via email to