sql2html : Convertir un dump SQL en un fichier html lisible facilement
On obtient ainsi une vue intuitive de la structure de la base de donnée.
#!/usr/bin/env perl
# 07/06/2010 -- François SERMAN
#
# sql2html.pl 0.1
#
# Permet de faire un rendu html d'un dump mysql (sans prendre en compte les contraintes)
if ($#ARGV+1==0) { print "Usage: sql2html.pl <<fichier sql>>\n"; exit 1;}
my $fichier = $ARGV[0];
my $open = 0;
open(FIC, $fichier);
while (<FIC>) {
if ($open == 0)
{
if (/CREATE TABLE `([_a-zA-Z0-9]+)`/) {
$open = 1;
print '<table border="1"><tr><td colspan="2">Table: ' .$1 . '</td></tr>' . "\n";
print '<tr><strong><td>Nom</td><td>Type</td></strong></tr>' . "\n";
}
}
else
{
if (/^\)/) { $open = 0; print "</table>\n\n<p> </p>\n\n"; }
elsif (/^\s+\`([_a-zA-Z0-9]+)` ([^ ]+)/)
{
print '<tr><td>' . $1 . '</td><td>' . $2 . '</td></tr>' . "\n";
}
}
# print $_;
}
if ($open) { print '</table>' . "\n" };
close (FIC);