blob: 5edb5e578fb738befa9c76c36aa8926fb874ac33 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
#!/bin/sh
#
# perl-syntax: Check validity of perl syntax in programs
# Copyright © 2010 Roger Leigh <rleigh@debian.org
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see
# <http://www.gnu.org/licenses/>.
#
#######################################################################
set -e
for program in "@abs_top_srcdir@/bin/"*
do
if grep '#!/usr/bin/perl' "$program" 2>&1 >/dev/null; then
echo "Checking $program"
PERL5LIB="@abs_top_srcdir@/lib" /usr/bin/perl -cw "$program"
fi
done
|
