Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Some suggestions on coding style - a chance to critique

by Sifmole (Chaplain)
on Jun 26, 2002 at 15:39 UTC ( #177409=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    print "abc\n";
    print "def\n";
    ...
    ghi
    EOD
    
  2. or download this
    use CGI qw(:cgi);
    
    ...
    
      print $q->redirect(
                       -url    => $_[0]                  );
    
  3. or download this
    &get_data (\$current_date, \$remote_host, 
               \$remote_addr, \$server_name);
    ...
        $$remote_addr = $ENV{'REMOTE_ADDR'};
        $$server_name = $ENV{'SERVER_NAME'};
    }
    
  4. or download this
    ($current_date, $remote_host, 
      $remote_addr, $server_name) = get_data();
    ...
                 $ENV{'REMOTE_HOST'}, $ENV{'REMOTE_ADDR'},
                 $ENV{'SERVER_NAME'};
    }
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://177409]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2014-09-21 12:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (168 votes), past polls