Difference between revisions of "Perl tips"
| (One intermediate revision by the same user not shown) | |||
| Line 9: | Line 9: | ||
* https://perldoc.perl.org/functions/chop.html | * https://perldoc.perl.org/functions/chop.html | ||
| + | |||
| + | == Create path based on file name == | ||
| + | |||
| + | <pre> | ||
| + | use Path::Class; | ||
| + | |||
| + | my $destination_file = file('tardir/dest1/dest2/test.txt'); | ||
| + | $destination_file->dir->mkpath; | ||
| + | |||
| + | # ... do the copying here | ||
| + | </pre> | ||
== References == | == References == | ||
<references /> | <references /> | ||
| + | |||
| + | [[Category:Tips]] | ||
Latest revision as of 22:33, 14 January 2023
Undefine vars[edit]
You have several ways to undef a list of vars already. The most simple I know is ( $from, $to ) = ();
Chop[edit]
Create path based on file name[edit]
use Path::Class;
my $destination_file = file('tardir/dest1/dest2/test.txt');
$destination_file->dir->mkpath;
# ... do the copying here
