diff options
| author | Sadie Powell <sadie@witchery.services> | 2021-01-29 13:46:37 +0000 |
|---|---|---|
| committer | Sadie Powell <sadie@witchery.services> | 2021-01-29 13:46:37 +0000 |
| commit | 2fceea41e8eefe0e109d7b7de445589bfd2a49ef (patch) | |
| tree | f1f36f2d8c1440b17b9f600fcd17b2b9fe12b50c /make/template | |
| parent | 3e557e85d3ae1ef6d09ed2fdda379d8833a4400d (diff) | |
Always use for in Perl modules.
Diffstat (limited to 'make/template')
| -rw-r--r-- | make/template/inspircd | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/make/template/inspircd b/make/template/inspircd index 4b316e0e0..70072df60 100644 --- a/make/template/inspircd +++ b/make/template/inspircd @@ -149,8 +149,8 @@ sub cmd_help() my @cmds = grep /^cmd_/, @subs; my @devs = grep /^dev_/, @subs; local $_; - $_ =~ s/^(cmd|dev)_// foreach (@cmds, @devs); - $_ =~ s/_/-/g foreach (@cmds, @devs); + $_ =~ s/^(cmd|dev)_// for (@cmds, @devs); + $_ =~ s/_/-/g for (@cmds, @devs); print STDERR "Usage: ./inspircd (" . join("|", @cmds) . ")\n"; print STDERR "Developer arguments: (" . join("|", @devs) . ")\n"; exit GENERIC_EXIT_SUCCESS; |