Thread Datei lesen und schreiben (4 answers)
Opened by Gast at 2009-01-28 22:25

renee
 2009-01-28 23:19
#118455 #118455
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Das sieht mir sehr nach dem .ini-Format aus. Da kannst Du mit CPAN:Config::IniFile die Datei einlesen, den neuen Wert setzen und mit dem Modul wieder rausschreiben.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
#!/usr/bin/perl

use strict;
use warnings;
use Config::IniFiles;

my $file = 'test.ini';

my $ini = Config::IniFiles->new( -file => $file );
$ini->setval( 'VARIABLE', 'UPDLEVEL', 'neuer Wert' );
$ini->WriteConfig( $file );


Oder Du machst es mit CPAN:Tie::File:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!/usr/bin/perl

use strict;
use warnings;
use Tie::File;

my $file = 'test.ini';

tie my @lines, 'Tie::File', $file or die $!;
for my $line ( @lines ){
    if( $line =~ /^UPDLEVEL/ ){
        $line = "UPDLEVEL=neuer Wert\n";
        last;
    }
}
untie @lines;
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

View full thread Datei lesen und schreiben