On Fri, Aug  3, 2012 at 12:51:03PM -0400, Andrew Dunstan wrote:
> 
> On 08/03/2012 10:51 AM, Bruce Momjian wrote:
> 
> 
> >OK, sure, we can keep the pgindent name --- I was just trying to be
> >consistent.  One problem with the lack of an extension is that there is
> >no easy way for the Perl cleanup instructions to find all the Perl
> >executables --- right now it looks for an extension.  Do we have other
> >Perl scripts in our tree that don't end in *.pl or *.pm?  I didn't find
> >any with this script:
> >
> >     $ find . -type f -exec file {} \;|grep Perl
> >     ./src/backend/catalog/Catalog.pm: Perl5 module source text
> >     ./src/tools/msvc/MSBuildProject.pm: Perl5 module source text
> >     ./src/tools/msvc/Project.pm: Perl5 module source text
> >     ./src/tools/msvc/Mkvcbuild.pm: Perl5 module source text
> >     ./src/tools/msvc/Install.pm: Perl5 module source text
> >     ./src/tools/msvc/Solution.pm: Perl5 module source text
> >     ./src/tools/msvc/VCBuildProject.pm: Perl5 module source text
> >     ./src/tools/msvc/VSObjectFactory.pm: Perl5 module source text
> 
> Try:
> 
>    find . -exec file {} \; | egrep 'perl script|perl -w script|Perl5
>    module'

OK, I used:

$ find . -type f -exec file {} \;|
        egrep -i 'perl.*(script|module)'|grep -v '\.p[lm]:'

and got:

./src/pl/plperl/ppport.h: awk script text
./src/tools/pginclude/pgcheckdefines: a /usr/bin/perl -w script text executable
./src/tools/git_changelog: a /usr/bin/perl script text executable

The last two are Perl scripts without Perl file extensions, so let's
just go with 'pgindent' and I will hard-code those into the perltidy
instructions.


-- 
  Bruce Momjian  <br...@momjian.us>        http://momjian.us
  EnterpriseDB                             http://enterprisedb.com

  + It's impossible for everything to be true. +

-- 
Sent via pgsql-hackers mailing list (pgsql-hackers@postgresql.org)
To make changes to your subscription:
http://www.postgresql.org/mailpref/pgsql-hackers

Reply via email to