Jose Nyimi wrote:
Gunnar Hjalmarsson wrote:
Marcos Rebelo wrote:
Gunnar Hjalmarsson wrote:
#!/usr/bin/perl
use strict;
use warnings;
open my $GROUPS, 'File1' or die $!;
open my $USERS, 'File2' or die $!;
my %groups;
chomp and $groups{$_} = [] for <$GROUPS>;
while ( <$USERS> ) {
my ($user, @grou
> -Message d'origine-
> De : Gunnar Hjalmarsson [mailto:[EMAIL PROTECTED]
> Envoyé : mercredi 18 août 2004 17:18
> À : [EMAIL PROTECTED]
> Objet : Re: Data comparision analysis
>
> Marcos Rebelo wrote:
> > Gunnar Hjalmarsson wrote:
> >> Or a
Marcos Rebelo wrote:
Gunnar Hjalmarsson wrote:
Or a little shorter:
#!/usr/bin/perl
use strict;
use warnings;
open my $GROUPS, 'File1' or die $!;
open my $USERS, 'File2' or die $!;
my %groups;
chomp and $groups{$_} = [] for <$GROUPS>;
while ( <$USERS> ) {
my ($user, @groups) = split;
$group
> Gunnar Hjalmarsson wrote:
>
> David Greenberg wrote:
> > #!/usr/bin/perl
> > use strict;
> > open (GROUPFH, " > my @groups = ();
> > while (my $line = ) {
> > chomp ($line);
> > push (@groups, $line);
> > }
> > close (GROUPFH);
> > open (USERFH, "File2");
> > my %group_to_users = ();
>
To: "[EMAIL PROTECTED]" <[EMAIL PROTECTED]>
cc: [EMAIL PROTECTED]
Subject:Re: Data comparision analysis
#!/usr/bin/perl
use strict;
open (GROUPFH, ") {
chomp ($line);
push (@groups, $line);
}
close (GROUPFH);
open (USERFH
David Greenberg wrote:
#!/usr/bin/perl
use strict;
open (GROUPFH, ") {
chomp ($line);
push (@groups, $line);
}
close (GROUPFH);
open (USERFH, "File2");
my %group_to_users = ();
while (my $line = ) {
chomp ($line);
my ($user, @user_groups) = split ('\s+', $line);
for my $gro
#!/usr/bin/perl
use strict;
open (GROUPFH, ") {
chomp ($line);
push (@groups, $line);
}
close (GROUPFH);
open (USERFH, "File2");
my %group_to_users = ();
while (my $line = ) {
chomp ($line);
my ($user, @user_groups) = split ('\s+', $line);
for my $group (@user_groups) {
Hi all,
I have two files, one with group names and the other with user name and
groups. Can someone help with code that will enable me sort the data by
group name? Example:
File 1
Group1
Group 2
Group ..n
File 2
User name group1 group2 ... groupn
Final result
Group name :
user 1
us