Comment puis-je créer un chemin d'accès avec tous ses sous-répertoires d'un seul coup en Perl?

Si vous avez un chemin d'accès à un fichier (par exemple, /home/bob/test/foo.txt) où chaque sous-répertoire dans le chemin d'accès peut ou peut ne pas exister, comment puis-je créer le fichier foo.txt d'une manière qui utilise "/home/bob/test/foo.txt" comme la seule entrée à la place de la création de chaque inexistant répertoire dans le chemin un par un et enfin la création d'foo.txt elle-même?

OriginalL'auteur Haiyuan Zhang | 2009-08-25

Leave a Reply

Votre adresse de messagerie ne sera pas publiée. Les champs obligatoires sont indiqués avec *