diff options
Diffstat (limited to 'stats.pl')
-rwxr-xr-x | stats.pl | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -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; |