This is part og my Java code and Perl Script(testing)

        nodes_s = getParameter("nodes"); //citeste numarul de noduri
        if (nodes_s==null) //daca nu exista parametrul
        {
            error_msg="Need parameter 'NODES' [1]";
        }
        else
        if (nodes_s.equals("")) //daca nu contine nimic
        {
            error_msg="Need parameter 'NODES' [2]";
        }
        
        try
        {
            nodes = Integer.parseInt(nodes_s);
        }
        catch (NumberFormatException e) //daca nu e un numar
        {
            error_msg="Parameter 'NODES' must be numeric [3]";
        }
        
        ndata = new String[nodes+1][9]; //defineste matricea de date
        for (i=1;i<nodes+1;i++) //o parcurgem in sens crescator
        {
            s=getParameter(""+i); //citim parametrul i
            if (s==null) //daca nu exista
            {
                error_msg="Need parameter '"+i+"' [4]";
                break;
            }
            else
            if (s.equals(
[download]

-----------------------------------

$nodes1 = "1|Monica|0|2|0|0";

$nodes2 = "2|Ion|1|0|3|1";

$nodes3 = "3|Mihai|1|6|4|1";

   print "$nodes1~|~$nodes2~|~$nodes3~|~
[download]