diff options
| author | Mike Gabriel <mike.gabriel@das-netzwerkteam.de> | 2017-06-23 00:49:37 +0200 |
|---|---|---|
| committer | Mike Gabriel <mike.gabriel@das-netzwerkteam.de> | 2017-06-23 00:49:37 +0200 |
| commit | bc39dda3e4c7068e7bd219166c59110f4035ef4f (patch) | |
| tree | d4cb2acfac42edf7be624386f4f5e4f73d3830d0 /bin/arctica-getdir | |
| parent | 3fc4c7f0f8c39955971c7590d4833f83e30e2000 (diff) | |
| download | perl-Arctica-Core-bc39dda3e4c7068e7bd219166c59110f4035ef4f.tar.gz perl-Arctica-Core-bc39dda3e4c7068e7bd219166c59110f4035ef4f.tar.bz2 perl-Arctica-Core-bc39dda3e4c7068e7bd219166c59110f4035ef4f.zip | |
Provide arctica-getdir. Formerly known as get_adir.
Diffstat (limited to 'bin/arctica-getdir')
| -rwxr-xr-x | bin/arctica-getdir | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/bin/arctica-getdir b/bin/arctica-getdir new file mode 100755 index 0000000..0eab4b6 --- /dev/null +++ b/bin/arctica-getdir @@ -0,0 +1,5 @@ +#!/usr/bin/perl -T + +use Arctica::Core::ManageDirs; +my $adirs = Arctica::Core::ManageDirs->new(); +print "$adirs->{'tmp_adir'}\n"; |