Expanding a little on
chromatic's reply...
To remove all the files
within the directory,
you'd need to append the '*' to the path name
to expand it to file names just within that directory.
Plus, you'd have to concatenate it into a single
argument so that system() will see the '*' and
pass the whole thing through the shell for expansion:
system("rm -rf $tmp_dir/*");
The '/' separator is UNIX-specific, though,
so if portability is important you'd want to:
use File::Spec;
system("rm -rf " . File::Spec->catfile($tmpdir, "*"));
However, removing files within a temporary
directory this way is a little laborious.
If the whole directory is really temporary,
it's more usual to just blow it away and recreate it.
You can do this very simply
(and without using an external command) as follows:
use File::Path;
my $tmp_dir = "/tmp/blahblah-11-14-2000";
rmtree($tmp_dir); # no error check; doesn't matter if it doesn'
+t exist
mkdir($tmp_dir) or die "Unable to make temporary folder $tmp_dir:
+$!\n";
This works unless you really must re-use the
existing temporary directory itself,
which I can only imagine in the unusual case
where you can't create a new directory in /tmp.
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.