use Data::Dumper;
print Dumper \%data2;

# Ausgabe:
$VAR1 = {
          'pc3' => [
                     'gruppe1'
                   ],
          'pc5' => [
                     'gruppe2'
                   ],
          'pc4' => [
                     'gruppe2'
                   ],
          'pc6' => [
                     'gruppe3'
                   ],
          'pc1' => [
                     'gruppe3',
                     'gruppe1'
                   ],
          'pc2' => [
                     'gruppe1',
                     'gruppe2'
                   ]
        };