--- Rodrick Brown <[EMAIL PROTECTED]> wrote:
> Is there a more efficient way to handle the method I
> choose to unroll my HoH.
> Thanks.
>
> #!/usr/bin/perl -w
> use strict;
> use warnings;
> use Data::Dumper;
>
> my @data = ;
>
> my ($user,$gid,$homedir,%userMap);
> foreach(@data) {
> /^#/
Is there a more efficient way to handle the method I choose to unroll my HoH.
Thanks.
#!/usr/bin/perl -w
use strict;
use warnings;
use Data::Dumper;
my @data = ;
my ($user,$gid,$homedir,%userMap);
foreach(@data) {
/^#/ and next;
/(\w+):/ and $user = $1;
/\w+:*:(\d+):/ and $gid = $1;
/.*:(.*