diff options
| -rwxr-xr-x | bin/ekgping | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/ekgping b/bin/ekgping index 43981a0..e7c5764 100755 --- a/bin/ekgping +++ b/bin/ekgping @@ -23,7 +23,7 @@ my $dead_count = 0; my $column = 0; my $column_max = Term::Size::chars; -my $beep_file = dist_file( 'ekgping', 'beep.ogg' ); +my $beep_file; my $quiet = 0; GetOptions( @@ -34,6 +34,8 @@ GetOptions( ) or usage(); +$beep_file //= dist_file( 'ekgping', 'beep.ogg' ); + my $host = shift or usage(); my @ping_opts = @ARGV; my $mixer = SDL::Mixer->new(); |