From 463de8fb5daf8178039f397cd73e5bd7fe134836 Mon Sep 17 00:00:00 2001 From: Alexander Sulfrian Date: Wed, 28 Oct 2015 18:47:33 +0100 Subject: Move socket files into $HOME/var/ --- stats.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'stats.pl') diff --git a/stats.pl b/stats.pl index 5dd65a9..2670297 100755 --- a/stats.pl +++ b/stats.pl @@ -6,12 +6,13 @@ use AnyEvent::Socket; use AnyEvent::Handle; use Storable; use Data::Dumper; +use File::HomeDir; # timeout in seconds my $timeout = 10; # socket -my $socket = '/tmp/stats.sock'; +my $socket = File::HomeDir->my_home . '/var/stats.sock'; my $cv = AnyEvent->condvar; -- cgit v1.2.3-1-g7c22