Malin
f55c91276e
- Add videodb PHP/MySQL media collection manager (Blu-ray, DVD, CD) - Dockerfile: PHP 8.1 + Apache with GD/mysqli/exif extensions - docker-compose.yml: app on port 6761 + MySQL 8.0 with health checks - docker-entrypoint.sh: auto-generates config.inc.php from env vars, waits for MySQL, initializes DB schema idempotently - init-db.php: CLI schema installer using app's own prefix_query() logic - Persistent volumes for DB, cache, and cover images Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
31 lines
640 B
Perl
31 lines
640 B
Perl
#!/usr/bin/perl
|
|
|
|
use DBI;
|
|
|
|
$db_server = "localhost";
|
|
$db_user = "www";
|
|
$db_password = "leech";
|
|
$db_database = "VideoDB";
|
|
|
|
$dbh = DBI->connect("dbi:mysql:$db_database:$db_server",$db_user,$db_password) || die("Can't connect");
|
|
|
|
|
|
$SELECT = "SELECT filename, filesize, diskid
|
|
FROM videodata
|
|
ORDER BY filename";
|
|
|
|
$result = $dbh->selectall_arrayref($SELECT);
|
|
|
|
print "DiskID\tSize\t\tFilename\n";
|
|
print "-"x74;
|
|
print "\n";
|
|
|
|
$row=0;
|
|
while (defined($result->[$row][0])){
|
|
printf("%s\t",$result->[$row][2]);
|
|
printf("%3.2f MB\t",($result->[$row][1]/(1024*1024)));
|
|
printf("%s\n",$result->[$row][0]);
|
|
|
|
$row++;
|
|
}
|