Thread PERL: regexp frage... (13 answers)
Opened by Roki at 2010-07-19 14:44

Gast Roki
 2010-07-19 14:44
#139916 #139916
Hallo,

ich möchte die Benutzer, die nur mit dem erste Anfangsbuchstaben (des Vornamen) und anschließendem Nachnamen eingetragen sind, von den Benutzern die mit vollem ausgeschriebenen Vor -und Nachnamen eingetragen sind, trennen.

die Benutzer sind in einer passwd Datei eingetragen

passwd
Code: (dl )
1
2
3
4
5
6
7
8
julia.muster:TESmoyolFbmU
denise.muster:TEfmFV32A2..
matz.muster:TEY7J0e4k/u6
sabrina.muster:ev8LQZSMFAyE
v.muster:8LzwM6iMIeZI
d.muster1:Gxr55Iner2EQ
d.muster2:y.MT.5vOEiIg
c.muster:OyuhWGXOA3h6


also,
v.muster:8LzwM6iMIeZI
d.muster1:Gxr55Iner2EQ
d.muster2:y.MT.5vOEiIg
c.muster:OyuhWGXOA3h6

soll von den anderen getrennt werden und in extra datei gespeichert werden.

und hier ist das Script was noch nicht fertig ist da mir das wissen fehlt:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#!/usr/bin/perl -w

use strict;

my ($passwd, @inhalt, @csv, @trennen, $benutzer, $a);

$passwd = "passwd";

if (! -z $passwd) {
open CSV, $passwd;
@csv = <CSV>;
close CSV;

foreach (@csv) {
chomp;
@trennen = split(/:/,$_);
$benutzer = $trennen[0];
my @v = split(/\./, $benutzer);
print $v[0] . "\n";

}

}


kann mir da jemand erklären wie ich das machen kann?

Danke im voraus.

LG,
Roki

mod-edit pq: passwörter & namen verfremdet
Last edited: 2010-07-21 00:08:26 +0200 (CEST)

View full thread PERL: regexp frage...