Utiliser les appels systèmes du module POSIX :
#!/usr/bin/perl use strict; use POSIX; chdir("/tmp"); mkdir("essai_1") or warn $!; chdir("essai_1"); print getcwd() ."\n"; chdir("../"); rmdir("essai_1") or die $!;
Plus d'informations dans le man POSIX.