Revision 00a6bdd7
Von Sven Schöling vor etwa 3 Jahren hinzugefügt
SL/InstallationCheck.pm | ||
---|---|---|
82 | 82 |
@developer_modules = ( |
83 | 83 |
{ name => "DBIx::Log4perl", url => "http://search.cpan.org/~mjevans/", }, |
84 | 84 |
{ name => "Devel::REPL", url => "http://search.cpan.org/~doy/", debian => 'libdevel-repl-perl' }, |
85 |
{ name => "Term::ReadLine::Gnu", url => "http://search.cpan.org/~hayashi/", debian => 'libterm-readline-gnu-perl' }, |
|
85 | 86 |
{ name => "Log::Log4perl", url => "http://search.cpan.org/~mschilli/", debian => 'liblog-log4perl-perl' }, |
86 | 87 |
{ name => "LWP::Simple", url => "http://search.cpan.org/~gaas/", debian => 'libwww-perl', dist_name => 'libwww-perl' }, |
87 | 88 |
{ name => "Moose::Role", url => "http://search.cpan.org/~doy/", debian => 'libmoose-perl' }, |
scripts/console | ||
---|---|---|
2 | 2 |
|
3 | 3 |
use warnings; |
4 | 4 |
use strict; |
5 |
use utf8; |
|
6 |
use open qw(:std :utf8); |
|
5 | 7 |
use 5.008; # too much magic in here to include perl 5.6 |
6 | 8 |
|
7 | 9 |
BEGIN { |
... | ... | |
64 | 66 |
my $repl = Devel::REPL->new; |
65 | 67 |
$repl->load_plugin($_) for @plugins; |
66 | 68 |
$repl->load_history($history_file); |
69 |
|
|
70 |
binmode($repl->out_fh, 'utf8'); |
|
71 |
|
|
72 |
$repl->eval('use utf8;'); |
|
67 | 73 |
$repl->eval('help'); |
68 | 74 |
$repl->print("trying to auto login into client '$client' with login '$login'...\n"); |
69 | 75 |
execute_code($repl, "lxinit '$client', '$login'"); |
Auch abrufbar als: Unified diff
scripts/console: utf8 Kompatibilität und Doku zu Term::ReadLine::Gnu