Well, for starters, I'd suggest you take a look at open, split, strict and DBI.

You may also want to read perlre, in case you need regular expressions for matching your data.

The following is similiar to what you may be trying to achieve:

# enable strict syntax
use strict;

# load the DBI module (for database connectivity)
use DBI;

# open connection to database. when you use strict, you
# need to declare your variables with 'my'. this a good
# thing. trust me.

my $dbh = DBI->connect("DBI:mysql:databasename", "user", "password", {
+RaiseError => 1});

# create a statement handle. the question marks a
# placeholders, which simply denote the place you'll
# put your data

my $sth = $dbh->prepare("INSERT INTO table (column1, column2) VALUES (
+?, ?)");

open FH, "myfile.txt" or die "Can't open myfile.txt: $!\n";

until ( eof FH ) {
   my @data;

   for (1..7) {
      my $line = <FH>;   # slurp in new line
      chomp;             # remove trailing newline character
      push @data, $line; # add current line to data array
   }

   #
   # do stuff with @data
   #

   # actually the data insert into the database
   $sth->execute( $var1, $var2 );
}

close FH;

$dbh->disconnect();
[download]

It's a sketch. It won't work, but it'll get you started. And buy a book! Programming Perl's pretty good :)

[ ar0n ]

---

update: you're right; i forgot to add $dbh->disconnect(). too used to apache::dbi, i guess ;)