Szia!
És valóban! Kis finomítás után ez tökéletesen működött.
(a finomítás abban állt, hogy valamiért DOS féle sorvégek képződtek a
UNIX féle helyett, ezeket kellett megfaragni)
Köszi!
Zs.
On Sun, 4 Nov 2007 13:39:17 +0100
Gabor Gombas <[EMAIL PROTECTED]> írta:
> Eh, nem kell ennyire bonyolitani. Pl.:
>
> #! /usr/bin/perl
>
> use DB_File;
>
> tie %a, 'DB_File', $ARGV[0], O_RDONLY, 0644, $DB_HASH;
>
> foreach $key (keys %a) {
> $vcard = $a{$key};
> $vcard =~ s/\c@//;
> print "$vcard\n==================\n";
> }
>
> Innentol azt csinalsz az adattal, amit akarsz...
--
A humor az elme mindennapos tisztálkodása.
_________________________________________________
linux lista - [email protected]
http://mlf2.linux.rulez.org/mailman/listinfo/linux