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.