Help for this page
#this line is problematic @$scalarclose[$count]=map {$_}, @ctagarray;
@$scalarclose[$count]=[map {$_}, @ctagarray];