Проблемы с opendir

@Marley · Регистрация: 29.12.2011

Всем привет! Начала учить Perl и вот первая проблемка. Вот код:

Perl

opendir(DIR, 'D:\\abc') || die "Error: $!\n";
my @files = readdir(DIR) || die "Error: $!\n";
closedir(DIR);
print @files;

в общем в папке много файлов, но принтом выводит только точку и все.
Почему так?))

@chernomyrdin · 29.12.2011, 17:25

Уберите из строчки с readdir || die "Error: $!", а то вы этой конструкцией заставляете работать ее в скалярном контексте.

@chernomyrdin 9 / 9 / 1 Регистрация: 19.12.2011 Сообщений: 12
	29.12.2011, 17:25	2
	Уберите из строчки с readdir \|\| die "Error: $!", а то вы этой конструкцией заставляете работать ее в скалярном контексте. 0