Hi ppl. Сорри за офтопик, перл из potato и хочу спросить у Вас :) Вот
таой момент непонятный мне и куда копать. При @files = <*> по идее должен
формироваться массив из имен файлов, но если в файловом имени пробел, то
в массив поступают последовательно обе части файла. Научите, плиз, где я
не прав. Ниже простенький скрипт. 

[EMAIL PROTECTED] $: perl -v
This is perl, version 5.005_03 built for i386-linux


[EMAIL PROTECTED]/bin/perl/bug $: l
итого 1
-rwxr-xr-x    1 bako     users          89 Окт 22 14:59 bug.pl
-rw-r--r--    1 bako     users           0 Окт 22 15:00 first
-rw-r--r--    1 bako     users           0 Окт 22 15:00 sec ond
-rw-r--r--    1 bako     users           0 Окт 22 15:04 thir\d

[EMAIL PROTECTED]/bin/perl/bug $: cat bug.pl
#!/usr/bin/perl
@files = <*>;
for ($a=0; $a<=$#files; ++$a) {
  print "$files[$a] \n";
}

[EMAIL PROTECTED]/bin/perl/bug $: ./bug.pl
bug.pl
first
sec
ond
thir\d

-- 
  Andrey Ivaschenko
  nic-hdl:   AI1569

Ответить