|
|
1.1 ! misha 1: $filespec[./243/a//b///c////d.txt] ! 2: $s[dummy] ! 3: ^s.save[$filespec] ! 4: ! 5: ^if(-f $filespec){file exist<br />} ! 6: ^if(-f "./243/a/b/c/d.txt"){file exist<br />} ! 7: ^if(-d ^file:dirname[$filespec]){dir exist<br />} ! 8: ^if(-d "./243/a/b/c"){dir exist<br />} ! 9: ! 10: ^file:delete[$filespec] ! 11: ^if(!(-d "./243")){dir doesn't exist (it's OK)<br />}