Programación Web y Scripting > Perl
Configuracion
(1/1)
su -:
Hola solocodiger@s :hola: .
Les agradeseria mucho si me dijeran como hago un programa que lea X informacino para crear un archivo de configuracion, es decir, como hago un programa que lea un codigo sabiendo que toda linea que enpiese por el signo \ y termine con el signo / es algo, un objeto para leer.
Gracias.
su -:
:D Ya se Como!!
#!/usr/bin/perl -w
my $langfile = "archivo_para_ver";
my @LANG;
open(FICHIER, $langfile);
my $comp = 0;
my $ligne;
while ($ligne = <FICHIER>) {
$LANG[$comp] = $ligne;
chomp($LANG[$comp]);
$comp += 1;
}
close FICHIER;
print $LANG[2];
explorer:
Si... pero no se dicé qué es lo que hay que hacer con ese objeto...
Si sólo queremos quedarnos con esos objetos entonces los podemos extraer con este una-línea:
--- Código: Text ---perl -nle 'if ( m{^\\(.*)/$} ) {print $1}' archivo_para_ver
su -:
Quetal ferrero.
Que bueno tenerte aqui, en SoloCodigo! :D
Navegación
Ir a la versión completa