drakx - Mageia Installer and base platform for many utilities

Mageia Installer and base platform for many utilities

Thierry Vignaud [tv]

summary refs log tree commit diff stats

path: root/perl-install/install_interactive.pm

diff options

author	Damien Chaumette <dchaumette@mandriva.com>	2003-01-07 14:28:26 +0000
committer	Damien Chaumette <dchaumette@mandriva.com>	2003-01-07 14:28:26 +0000
commit	d16b0d72c9ea1087f7aa0704739a6e45e9e3d52d (patch)
tree	0e755cb6afd5b4740d3723281902dd9bacaabb2c /perl-install/install_interactive.pm
parent	7df327c7ea04f08e6378f3f14be6c4dcc2c3e50e (diff)
download	drakx-d16b0d72c9ea1087f7aa0704739a6e45e9e3d52d.tar drakx-d16b0d72c9ea1087f7aa0704739a6e45e9e3d52d.tar.gz drakx-d16b0d72c9ea1087f7aa0704739a6e45e9e3d52d.tar.bz2 drakx-d16b0d72c9ea1087f7aa0704739a6e45e9e3d52d.tar.xz drakx-d16b0d72c9ea1087f7aa0704739a6e45e9e3d52d.zip

add network::easy_dhcp function. Quietly setup eth0 in dhcp and restart network.

Diffstat (limited to 'perl-install/install_interactive.pm')

0 files changed, 0 insertions, 0 deletions

">, 'be' => 2, 'bg' => 2, 'bn' => 1, 'br' => 2, 'bs' => 2, 'ca' => 2, 'cs' => 2, 'cy' => 2, 'da' => 2, 'de' => 2, 'el' => 2, 'en_GB' => 2, 'en_US' => 2, 'eo' => 2, 'es' => 2, 'et' => 2, 'eu' => 2, 'fa' => 0, 'fi' => 1, 'fo' => 2, 'fr' => 2, 'ga' => 2, 'gd' => 2, 'gl' => 2, 'gv' => 2, 'he' => 0, 'hi' => 1, 'hr' => 2, 'hu' => 2, 'hy' => 1, 'ia' => 2, 'id' => 1, 'is' => 1, 'it' => 1, 'iu' => 1, 'ja' => 3, 'ka' => 1, 'kn' => 1, 'ko' => 1, 'kw' => 0, 'lo' => 0, 'lt' => 0, 'lv' => 0, 'mi' => 0, 'mk' => 0, 'mn' => 0, 'mr' => 0, 'ms' => 0, 'mt' => 0, 'nb' => 0, 'nl' => 0, 'nn' => 0, 'no' => 0, 'oc' => 0, 'pl' => 0, 'pt_BR' => 0, 'pt' => 0, 'ro' => 0, 'ru' => 0, 'sk' => 0, 'sl' => 0, 'sp' => 0, 'sq' => 0, 'sr' => 0, 'sv' => 0, 'ta' => 1, 'te' => 1, 'tg' => 0, 'th' => 0, 'tr' => 0, 'tt' => 1, 'uk' => 0, 'ur' => 1, 'uz' => 0, 'vi' => 0, 'wa' => 0, 'yi' => 0, 'zh_CN' => 0, 'zh_TW' => 0, ); foreach (glob("lang*.png")) { /lang-(.*)\.png/; exists $shifts{$1} or die "doesn't exist for $_"; $shifts{$1} or next; print "./a.out $_ l.png $shifts{$1}\n"; system("./a.out $_ l.png $shifts{$1}"); renamef('l.png', $_); }