#!/usr/bin/perl use strict; # https://perlmonks.org/?node_id=11159049 use warnings; use Text::CSV; $SIG{__WARN__} = sub { die @_ }; my %database; my $csv = Text::CSV->new; my @headers = $csv->getline( *DATA )->@*; while( my $fields = $csv->getline( *DATA ) ) { my $ref = \%database; $ref = $ref->{$_} //= {} for @$fields; } #use Data::Dump 'dd'; dd \%database; print "\n\n------ Indented Form ----------\n\n", show( \%database ); sub show { my $db = shift; my $answer = ''; for my $key ( sort keys %$db ) { $answer .= join '', "$key\n", show($db->{$key}) =~ s/^(?=.)/ /gmr; } return $answer; } __DATA__ File Server,Access Path,Current Permissions,Logon Name,Inherited From Folders,Flags,User/Group,Classification Results,Classification Results by Category (Including Nested),Total Hit Count 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,@FOO NOW Onsite Support,\Common,This folder only,Pathway12.My.Corp.com\@FOO NOW Onsite Support,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,Administrators,\Common,This folder only,10.15.106.71\Administrators,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,Creator Owner,\Common,This folder only,Abstract\Creator Owner,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,FP NOW BMG FSE NTFS Admins,\Common,This folder only,Pathway12.My.Corp.com\FP NOW BMG FSE NTFS Admins,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,ClusterSvcDIR,\Common,This folder only,Pathway12.My.Corp.com\ClusterSvcDIR,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,SYSTEM,\Common,This folder only,Abstract\SYSTEM,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,FMRWX,MiJim,,This folder only,"Pathway12.My.Corp.com\Michaels, Jim@My",IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,MRWX,@FP DIR BMG,\Common,This folder only,Pathway12.My.Corp.com\@FP DIR BMG,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,RX,&CDAdmin,\Common,This folder only,Pathway12.My.Corp.com\&CDAdmin,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,RX,@FOO DSMS Admins,\Common,This folder only,Pathway12.My.Corp.com\@FOO DSMS Admins,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,RX,FOO BMG FS Support,\Common,This folder only,Pathway12.My.Corp.com\FOO BMG FS Support,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,RX,DPeterso,\Common,This folder only,"Pathway12.My.Corp.com\Peterson, Dan@My",IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf,RX,FP BMG IMG Read Access,\Common,This folder only,Pathway12.My.Corp.com\FP BMG IMG Read Access,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/My-B8245.pdf,FMRWX,@FOO NOW Onsite Support,\Common,This folder only,Pathway12.My.Corp.com\@FOO NOW Onsite Support,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/My-B8245.pdf,FMRWX,Administrators,\Common,This folder only,10.15.106.71\Administrators,IRS Data (1/1),PII (1),1 10.15.106.71,/Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/My-B8245.pdf,FMRWX,Creator Owner,\Common,This folder only,Abstract\Creator Owner,IRS Data (1/1),PII (1),1 #### ------ Indented Form ---------- 10.15.106.71 /Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/Axidome Quote My Corp 2020211 KnowBe4 2-yr Renewal FINAL.pdf FMRWX @FOO NOW Onsite Support \Common This folder only Pathway12.My.Corp.com\@FOO NOW Onsite Support IRS Data (1/1) PII (1) 1 Administrators \Common This folder only 10.15.106.71\Administrators IRS Data (1/1) PII (1) 1 ClusterSvcDIR \Common This folder only Pathway12.My.Corp.com\ClusterSvcDIR IRS Data (1/1) PII (1) 1 Creator Owner \Common This folder only Abstract\Creator Owner IRS Data (1/1) PII (1) 1 FP NOW BMG FSE NTFS Admins \Common This folder only Pathway12.My.Corp.com\FP NOW BMG FSE NTFS Admins IRS Data (1/1) PII (1) 1 MiJim This folder only Pathway12.My.Corp.com\Michaels, Jim@My IRS Data (1/1) PII (1) 1 SYSTEM \Common This folder only Abstract\SYSTEM IRS Data (1/1) PII (1) 1 MRWX @FP DIR BMG \Common This folder only Pathway12.My.Corp.com\@FP DIR BMG IRS Data (1/1) PII (1) 1 RX &CDAdmin \Common This folder only Pathway12.My.Corp.com\&CDAdmin IRS Data (1/1) PII (1) 1 @FOO DSMS Admins \Common This folder only Pathway12.My.Corp.com\@FOO DSMS Admins IRS Data (1/1) PII (1) 1 DPeterso \Common This folder only Pathway12.My.Corp.com\Peterson, Dan@My IRS Data (1/1) PII (1) 1 FOO BMG FS Support \Common This folder only Pathway12.My.Corp.com\FOO BMG FS Support IRS Data (1/1) PII (1) 1 FP BMG IMG Read Access \Common This folder only Pathway12.My.Corp.com\FP BMG IMG Read Access IRS Data (1/1) PII (1) 1 /Common/Awareness and Training/KnowBe4/2020- KnowBe4 Subscription Renewal Docs/My-B8245.pdf FMRWX @FOO NOW Onsite Support \Common This folder only Pathway12.My.Corp.com\@FOO NOW Onsite Support IRS Data (1/1) PII (1) 1 Administrators \Common This folder only 10.15.106.71\Administrators IRS Data (1/1) PII (1) 1 Creator Owner \Common This folder only Abstract\Creator Owner IRS Data (1/1) PII (1) 1