Help for this page
#this script will create the database which will be used #CAREFUL! IF THERE EXISTS A PREVIOUS DATABASE IT WILL DELETE IT !!! ... `rm checksum_db.sqlite`; my $dbh = DBI->connect("dbi:SQLite:dbname=checksum_db.sqlite","",""); $dbh->do("CREATE TABLE checksums (id INTEGER PRIMARY KEY,checksum VARC +HAR(42),size INTEGER,last_date_modified DATE,name VARCHAR(200) UNIQUE +,is_dir VARCHAR(1),is_file VARCHAR(1),is_link VARCHAR(1),UNIQUE (chec +ksum,name));");
minsize: 64 directories: ... file: 1 link: 0 regex: .*
#this will be used just for the first run #!/usr/bin/perl ... }
#!/usr/bin/perl use strict; ... ); }
#!/usr/bin/perl use strict; ... }; close $script;
www.com | www.net | www.org
No recent polls found