Text Files...

[Deniz Hepşen]

Hi,
I want to do a parse fonction which reads prices.txt. My prices.txt file is like       
          

20::30::1
3::2::7

When i want to see for example "2",   i want to type  "    print "$x[1][1]";    "
Why this function below is false?

thanx


sub parse {

        open (PRICES , "<prices.txt");
        @bilgi=<PRICES>;
        close(PRICES);


        for ($i=0;$i<=$#bilgi;$i++)
        {
         @column=split(/::/, $bilgi[$i]);
         $line=\@column;
         @x=(@x, $line);

        }

}

&parse;