Parent Directory
| 
Revision Log
| 
Patch
| revision 131 by dpavlin, Mon Aug 3 20:59:35 2009 UTC | revision 137 by dpavlin, Tue Aug 4 13:31:06 2009 UTC | |
|---|---|---|
| # | Line 3 package server; | Line 3 package server; |
| 3 | use warnings; | use warnings; |
| 4 | use strict; | use strict; |
| 5 | ||
| 6 | use Module::Refresh; | use Module::Refresh qw//; |
| 7 | sub refresh { Module::Refresh->refresh }; | sub refresh { Module::Refresh->refresh }; |
| 8 | ||
| 9 | our $ip = '172.16.10.1'; | our $ip = '172.16.10.1'; |
| # | Line 19 our $debug; | Line 19 our $debug; |
| 19 | sub debug { $debug = config::shared('debug', @_) || 0 } | sub debug { $debug = config::shared('debug', @_) || 0 } |
| 20 | ||
| 21 | warn "loaded"; | warn "loaded"; |
| 22 | ||
| 23 | 1; |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |