$artfList = $ctf->PlanningAp->getArtifactListInPLanningFolder($session,$parent,$filters,$recursive);

%artfList =%$artfList;

foreach $element (keys %artfList){

print "$element\n"; #outpus is: dataRows

print "$artfList{dataRows}\n";  #output is: ARRAY(0x2139d)
}

@Array = @{$artfList{dataRows}};

foreach $element (@Array){

 print "$element\n";    # output is: ArtifactsInPlanningFolderSoapRow = HASH(0x3a3acf0)
}

##</code><code>##

bless( {
         'priority' => '1',
         'id' => 'artf0000',
         'category' => 'V0B'
}, 'ArtifactsInPlanningFolderSoapRow' )

# and it