Provided by: manpages-zh_1.5.2-1_all bug

NAME

       perlstyle - Perl

DESCRIPTION


        -w .  "no warnings"  $^W .  "use strict" .  "use sigtrap"  "use
       diagnostics" .

       ,  Larry . , :

       o   4-.

       o   .

       o

       o   .

       o   .

       o   .

       o   .

       o   "" ().

       o   .

       o   else

       o

       o   .

       o    ( "and"  "or" ).

       o   .

       o   .

       o   .

       Larry , .

       :

       o   . Perl , .

               open(FOO,$foo) || die "Can't open $foo: $!";

               die "Can't open $foo: $!" unless open(FOO,$foo);

               print "Starting analysis\n" if $verbose;

               $verbose && print "Starting analysis\n";

            -v

               return print reverse sort num values %array;
               return print(reverse(sort num (values(%array))));

            vi  %

       o    last  "" :

               LINE:
                   for (;;) {
                       statements;
                     last LINE if $foo;
                       next LINE if /^#/;
                       statements;
                   }

       o   --. .

       o    grep() ( map())  `` , .  foreach()  system() .

       o   ,  eval. ,  $] ( "English"  $PERL_VERSION) .  "Config" perl
           Configure .

       o

       o    $gotit , .  $var_names_like_this  $VarNamesLikeThis,.
           VAR_NAMES_LIKE_THIS

           . Perl  "pragma"  integer  strict. .

       o   :

               $ALL_CAPS_HERE    ( perl !)
               $Some_Caps_Here   global/static
               $no_caps_here     my()  local()

           . , $obj->as_string().

           .

       o    "/x" . .

       o    "and"  "or" ,  &&  ||. "&".

       o    here documents  print() .

       o   .

               $IDX = $ST_MTIME;
               $IDX = $ST_ATIME       if $opt_u;
               $IDX = $ST_CTIME       if $opt_c;
               $IDX = $ST_SIZE        if $opt_s;

               mkdir $tmpdir, 0700 or die "can't mkdir $tmpdir: $!";
               chdir($tmpdir)      or die "can't chdir $tmpdir: $!";
               mkdir 'tmp',   0777 or die "can't mkdir $tmpdir/tmp: $!";

       o   .  STDERR, . :

               opendir(D, $dir)     or die "can't opendir $dir: $!";

       o   :

               tr [abc]
                  [xyz];

       o   . .  use strict  use warnings ( -w) .

       o

       o

       redcandle <redcandle51@chinaren.com> 20010530

       http://cmpp.linuxforum.net