use Perl

• Worse is better, obviously (Score:2)

  by nicholas (3034)

  Sadly goto is a useful construction in C, because the flow control primitives are, well, far more primitive than Perl. For example, you can only break out of the innermost loop.

  Perl's goto has something that isn't offered by C or PHP - goto &NAME [perl.org]. That form is really the only form that anyone should be using in Perl code, and then only when they know what they're doing and why. I don't know PHP, but either it has flow control structures as powerful as Perl's, in which case goto is not needed, or the f
  • A quick plug for ack (Score:2)

    by petdance (2468)

    For those who don't use ack, this is exactly the sort of thing ack was designed to do easily.

    find perl-5.10.0 -name ext -prune -o '(' -type f -iname '*.c' -or -iname '*.cpp' -or -iname '*.h' ')' -exec cat {} \; | egrep '\bgoto\b' | wc -l

    is just

    ack --cc --cpp -w goto perl-5.10.0 | wc -l

    --cc means "C source and headers only", --cpp is "C++ source and headers only", -w means "word only".

    Just install CPAN package App::Ack.

    --
    

    --
    xoa
    • Re:A quick plug for ack (Score:1)

      by xsawyerx (8978) on 2009.06.10 10:16 (#69045) Journal

      *beats head on wall*

      Thanks Andy :)

      Reply to This

      Parent