Select Code to Download

cn: epcpc5
host: epcpc5
...
sysadm1: aslan
administratorContactInfo: sciops
nsHardwarePlatform: DellR730

#!/usr/bin/env perl
use strict;
...
    print "Usage: $0 ldapfilename\n";
    exit 1;
}

Global symbol "$data" requires explicit package name at ./ldap2csv.pl 
+line 58.
Global symbol "$data" requires explicit package name at ./ldap2csv.pl 
+line 59.
syntax error at ./ldap2csv.pl line 59, near "$data("
Global symbol "$data" requires explicit package name at ./ldap2csv.pl 
+line 59.
Execution of ./ldap2csv.pl aborted due to compilation errors.

 # Separate entries with commas.
        foreach my $key (keys %data) {
...
            $data($key) =~ s/(^|$)/"/g if $data($key) =~ /,/;
        }