UBB.Developers Forums Community Development Programming PHP and Server-side Scripting Help?

I am making a script, were i need to keep a database (just flat file), and i can add to it, and get stuff from it, but how do i get a specific line from it, edit the line, and put it right back over the old line (it's for the EDIT function)

The easiest way is to read the lines of the file into an array, replace the desired array element, then write the array back to the file.

If the lines in the file are all fixed length, you could use the seek function to read and write a specific line, without having to read and write the whole file.

If you have variable length lines, and you don't want to read the entire file into memory, you can use the following method:

• Copy the file, line by line, to a temporary file.
• For the line you want to modify, write the modified line, instead of the original line.
• Rename the temporary file to the original file.

Yup, dave's explanation hits it. There is no really good way to go to one line and edit it, in a random line length file.

one last question. How do i get the info from a form, that is made inside the script? like i can make an external html file, with the form, and do the CGI function to get the data, easy, but how do i get the data from a form that is built into my script?

I have no idea what you are asking. Can you please explain a little better?

--mark

Is this what you're talking about? http://www.perldoc.com/perl5.6.1/lib/CGI.html#SYNOPSIS

yeah, something like that, i never knew it was so involved. heh, if you cant tell, im new to perl

well, one last question and im set.

in my script, i need it to open a file, and append to it, EZ, i know, but i cant seem to understand how to do it. (i alrady have the like i want to append joined and everything, just need to append it.) but the book i have, really doesn't tell you how to do it...so im confused.

What kinda names are those for fish, Dave?

omg, so ez, i wish the book was clearer on that.

Just to let you know guys, that it works PERFECT!!!

EXECPT, how can i make it automaticly redirect you to the main page after you get done with the script?

spoke too soon

it works, but it always displays a server misconfiguration message, anyone know why? hes the page its comming from (try putting info in, it should give you a nice looking error page)

and here is the script...

[edit]uh...code doesn't seem to work...oh well

#!/usr/bin/perl -w
#------------------------------------------------------------------------------#
# #
# Script name: Match Scheduler #
# Discription: Refs register game between two teams #
# Last updated: 11/22/01 #
# #
#------------------------------------------------------------------------------#

#---------
# Password to add a match
#---------
$pw = 'le3t';
#----------
# Get form info
#----------
use CGI qw(:standard);
$ref = param("name");
$f_pw = param("pw");
$team1 = param("team1");
$team2 = param("team2");
$hour = param("hour");
$min = param("min");
$amp = param("amp");
#---------
# Check the ref and password
#---------
open(REFS, "while ( {
if (!(/^$ref/) || $ref eq '') {
$message = 'Sorry, you must be a ref to schedule a match, if you are, make sure you typed in your name correctly';
&message;
}
}
close(REFS);

if ($f_pw ne $pw) {
$message = 'Password is incorrect, please try again';
&message;
} else {
&add;
}

sub add {
$match = join('|=|', $team1, $team2, $hour, $min, $amp, $ref);

open(MATCHES, ">>matches.txt") or die "Cannot open Match file for appending: $!";
print MATCHES "$match n";
close(MATHCES);

&message = "Match succesfully added, thanks $ref";
&message;
}

sub message {
print "Content-type: text/htmlnn";
print<

..:: Home :: Forums ::..

main home about IFL League Staff forums standings schedule squads refs rules refs application schedule a match report a match captains application add a player delete a player links nmebase specfreq infantry-sector

Message :| $message

..:: Copyright :: Privacy Policy ::..

HTML
}

[ 11-22-2001: Message edited by: adam ]

[ 11-22-2001: Message edited by: Mark Badolato ]