HTML - Table Title Centering

#!/usr/bin/perl
use strict; use warnings;
print "Content-type: text/html\n\n";

my ($file1,$fileread1,@array1,$line1,$lastcol1,$firstcol1); 
$file1= '/home/yanni/scripts/testfiles/tempfile1';

open ($fileread1, $file1) || die "Could not open $file1: $!\n";
@array1 = <$fileread1>; close ($fileread1);

#--> SET PAGE TITLE, POSITION & FONT SIZE
print '<CENTER><STRONG><FONT SIZE="8">Blue</STRONG></CENTER>';

#--> SET TABLE TITLE
print '<CENTER><TABLE BORDER="5" BORDERCOLOR="BLACK" WIDTH="30%" CELLPADDING="5" CELLSPACING="5">
      <TR><TH COLSPAN="10"><H2><FONT SIZE="5">Work1</H2></TH></TR>';
print '<center><tr><th>Row 1</th><th>Row 2</th></tr><center>';

foreach $line1 (@array1){
                          ($lastcol1,$firstcol1)=split(/\s+/,$line1); 
                          print "<center><tr><td>$firstcol1</td><td>$lastcol1</td></tr>\n<center>";
                        };
####################tempfile2#####################
my ($fileread2,$file2, $array2,$line2,$lastcol2,$firstcol2); 
my $file2= '/home/yanni/scripts/testfiles/tempfile2';

open ($fileread2, $file2) || die "Could not open $file2: $!\n";
@array2 = <$fileread2>; close ($fileread2);

#-->SET BROWSER TAB NAME
print "<TITLE> TEST </TITLE>";

#--> SET TABLE TITLE
print '<CENTER><TABLE BORDER="5" BORDERCOLOR="BLACK" WIDTH="30%" CELLPADDING="5" CELLSPACING="5">
      <TR><TH COLSPAN="10"><H2><FONT SIZE="5">Work2</H2></TH></TR>';
print '<center><tr><th>Row 1</th><th>Row 1</th></tr><center>';

foreach $line2 (@array2){
                        ($lastcol2,$firstcol2)=split(/,/,$line2);
                         print "<center><tr><td>$firstcol2</td><td>$lastcol2</td></tr>\n<center>";
                      };

####################tempfile3####################
my ($fileread3,$file3, @array3,$line3,$lastcol3,$firstcol3); 
my $file3= '/home/yanni/scripts/testfiles/tempfile3';

open ($fileread3, $file3) || die "Could not open $file3: $!\n";
@array3 = <$fileread3>; close ($fileread3);

#--> SET TABLE TITLE
print '<CENTER><TABLE BORDER="5" BORDERCOLOR="BLACK" WIDTH="30%" CELLPADDING="5" CELLSPACING="5">
      <TR><TH COLSPAN="10"><H2><FONT SIZE="5">Work3</H2></TH></TR>';
print '<center><tr><th>Row 1</th><th>Row 2</th></tr><center>';

foreach $line3 (@array3){
                        ($lastcol3,$firstcol3)=split(/\s+/,$line3); 
                         print "<center><tr><td>$firstcol3</td><td>$lastcol3</td></tr>\n<center>";
                      };
#print '<CENTER><STRONG><FONT SIZE="8">Blue</STRONG></CENTER>';

######################putting the tables side by side#######
print '<style type="text/css" media="screen">BODY
           {
            color:white; background-color:00100C; font-family:sans-serif;
           }
 table { border: 6px solid blue;float:left;width:400px;}
 table_container{width:800px;margin:0 auto;}
</style>';