Help! 2 php

Anon

Well I have this in a cgi script, and im trying to convert it to perl(to be less server intensive and faster) so can someone either convert this to php or give an example how?

open(FEATURE,"dat/$FORM{whichone}.dat");
@feature = <FEATURE>;
close(FEATURE);
$number = @feature[0] ;
$section = @feature[1] ;
$articletype = @feature[2] ;
$releasedate = @feature[3] ;
$publisher = @feature[4] ;
$developer = @feature[5] ;
$genre = @feature[6] ;
$numberofplayers = @feature[7] ;
$esrbrating = @feature[8] ;
$console = @feature[9] ;
$author = @feature[10] ;
$datewritten = @feature[11] ;
$articletype = @feature[12] ;
$topimage = @feature[13] ;
$intro = @feature[14] ;
$body = @feature[15] ;
$conclusion = @feature[16] ;
$gameplay = @feature[17] ;
$graphics = @feature[18] ;
$sound = @feature[19] ;
$controls = @feature[20] ;
$overall = @feature[21] ;
$imageone = @feature[22] ;
$imagetwo = @feature[23] ;
$imagethree = @feature[24] ;
$imagefour = @feature[25] ;
$imagefive = @feature[26] ;
$imagesix = @feature[27] ;
$additionalmedia = @feature[28] ;
$additionalmedia2 = @feature[29] ;
$additionalmedia3 = @feature[30] ;
$frontpageimage = @feature[31] ;
$frontpageintro = @feature[32] ;
$commentquestion = @feature[33] ;
$mediadescription = @feature[34] ;
$mediadescription2 = @feature[35] ;
$mediadescription3 = @feature[36] ;

Anon

i want to display a table of with hyperlink content,while the mouseover a link text and dynamic table content should display onside of link text on same document and onmouse out that table should be cleared
pls

help
reply at nram_rajesh@yahoo.com
thank u

Anon

I mean im trying to convert it to php.

kparker

The first part is easy:

   $feature = file("dat/" . $FORM['whichone'] . ".dat");

Then carry on almost exactly as before (only difference is that arrays don't take a different prefix character in php):

   $number = $feature[0];

However, why not improve things while you're at it? Since the lines in the file, and the elements of the array, only have meaning based on the relative position, why not cut out the array entirely:

  list(
     $number,
     $section,
     ...
     $mediadescription2,
     $mediadescription3
    &nbsp😉 = file( "dat/" . $FORM['whichone'] . ".dat");

kparker

The recommendation to omit the array and read directly into a list of variables would apply equally well to the original Perl version.