Bugfix: allow digits in signal names (usr1, usr2)
This commit is contained in:
parent
a58206b6ea
commit
9bb31b4eef
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/head/; revision=13557
@ -33,7 +33,7 @@
|
||||
# Note: work only with effective uid due the limit of procfs
|
||||
# (eg. not with suid programs)
|
||||
#
|
||||
# $Id: killall,v 1.2 1995/06/24 11:12:38 w Exp w $
|
||||
# $Id: killall.pl,v 1.1.1.1 1995/06/25 18:08:27 joerg Exp $
|
||||
#
|
||||
|
||||
$ENV{'PATH'} = "/bin:/usr/bin";
|
||||
@ -59,7 +59,7 @@ while ($_ = $ARGV[0], /^-/) {
|
||||
elsif (/^-l$/) { exec 'kill', '-l' }
|
||||
elsif (/^-m$/) { $match = 1 }
|
||||
elsif (/^-s$/) { $show = 1 }
|
||||
elsif (/^-([A-Za-z]+|[0-9]+)$/) { $signal = $1 }
|
||||
elsif (/^-([a-z][a-z0-9]+|[0-9]+)$/i) { $signal = $1 }
|
||||
}
|
||||
|
||||
$program = $_; &usage unless $program;
|
||||
|
Loading…
Reference in New Issue
Block a user