Delete a file: Difference between revisions

(Added Wren)
Line 639:
Sleep
</lang>
 
=={{header|Furor}}==
<lang Furor>
###sysinclude dir.uh
// ===================
argc 3 < { #s ."Usage: " 0 argv print SPACE 1 argv print ." filename\n" end }
2 argv 'e !istrue { #s ."The given file ( " 2 argv print ." ) doesn't exist!\n" end }
2 argv removefile
end
</lang>
<pre>
Usage: furor removefile.upu filename
</pre>
 
<lang Furor>
###sysinclude dir.uh
#g argc 3 < { ."Usage: " #s 0 argv print SPACE 1 argv print SPACE ."unnecessary_directory\n" end }
2 argv 'd !istrue { ."The given directory doesn't exist! Exited.\n" }{
2 argv rmdir
}
end
</lang>
<pre>
Usage: furor rmdir.upu unnecessary_directory
</pre>
 
 
 
=={{header|Gambas}}==
Anonymous user