it returns :permission denied pleaseeeee...opendir (DIR,$dir) or die "Can't open folder $dir: $!\n"; @files = readdir DIR or die "Couldn't read from $dir: $!\n"; foreach $file (@files) { $/=undef; open MYFILE, "$file" or die "Cannot open :$!\n"; print MYFILE "$file \n"; close FILE; $/="\n"; } closedir DIR;
In reply to problem with print content of file by vrempire
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |