line |
true |
false |
branch |
78
|
0 |
0 |
unless defined $$self{$_} |
87
|
0 |
0 |
if (defined $$self{'listsDir'}) |
139
|
0 |
0 |
if (defined $$self{'logfd'}) { } |
152
|
0 |
0 |
if ($$self{'verbose'}) |
173
|
0 |
0 |
if ($file =~ /\.gz$/) { } |
196
|
0 |
0 |
if ($file =~ /\.gz$/) { } |
222
|
0 |
0 |
if ($dbkey =~ s/\s*\{([^\}]+)\}//o) |
224
|
0 |
0 |
if ($s =~ s/\s*\(\#(\d+)\.(\d+)\)$//) { } |
|
0 |
0 |
elsif ($s =~ /^\((\d\d\d\d)\-(\d\d)\-(\d\d)\)$/) { } |
255
|
0 |
0 |
if (defined $$self{'seriesKeys'}{$parentKey}) |
262
|
0 |
0 |
if ($dbkey =~ s/^\"//o and $dbkey =~ s/\" \(/ (/o) { } |
|
0 |
0 |
elsif ($dbkey =~ s/\s+\(TV\)$//o) { } |
|
0 |
0 |
elsif ($dbkey =~ s/\s+\(V\)$//o) { } |
|
0 |
0 |
elsif ($dbkey =~ s/\s+\(VG\)$//o) { } |
263
|
0 |
0 |
if ($dbkey =~ s/\s+\(mini\)$//o) { } |
264
|
0 |
0 |
if ($hash{'parentId'} == 0) { } |
273
|
0 |
0 |
if ($hash{'parentId'} == 0) { } |
305
|
0 |
0 |
if ($title =~ /^\"/o and $title =~ /\"\s*\(/o) |
310
|
0 |
0 |
if ($title =~ s/\s+\((\d\d\d\d)\)$//o or $title =~ s[\s+\((\d\d\d\d)/[IVXL]+\)$][]o) { } |
|
0 |
0 |
elsif ($title =~ s/\s+\((\?\?\?\?)\)$//o or $title =~ s[\s+\((\?\?\?\?)/[IVXL]+\)$][]o) { } |
313
|
0 |
0 |
if (not defined $year) { } |
323
|
0 |
0 |
if (not defined $year) { } |
334
|
0 |
0 |
if (not defined $year) { } |
344
|
0 |
0 |
if ($hash{'qualifier'} == 13 or $hash{'qualifier'} == 12) { } |
350
|
0 |
0 |
if (not defined $hash{'title'}) { } |
378
|
0 |
0 |
if (/^MOVIES LIST/o) { } |
|
0 |
0 |
elsif ($lineCount > 1000) { } |
379
|
0 |
0 |
unless ($_ = <$fh> and /^===========/o) |
384
|
0 |
0 |
unless ($_ = <$fh> and /^\s*$/o) |
398
|
0 |
0 |
if $$self{'showProgressBar'} |
403
|
0 |
0 |
if $$self{'showProgressBar'} |
404
|
0 |
0 |
if $$self{'showProgressBar'} |
419
|
0 |
0 |
if $line =~ /^\-\-\-\-\-\-\-+/o |
421
|
0 |
0 |
if $line =~ /\{\{SUSPENDED\}\}/o |
430
|
0 |
0 |
if ($tab != -1) { } |
432
|
0 |
0 |
if ($ykey = /\s+(\d\d\d\d)$/) { } |
|
0 |
0 |
elsif ($ykey = /\s+(\?\?\?\?)$/) { } |
|
0 |
0 |
elsif ($ykey = /\s+(\d\d\d\d)\-(\?\?\?\?)$/) { } |
|
0 |
0 |
elsif ($ykey = /\s+(\d\d\d\d)\-(\d\d\d\d)$/) { } |
473
|
0 |
0 |
if ($$self{'showProgressBar'}) |
475
|
0 |
0 |
if ($count > $countEstimate) { } |
|
0 |
0 |
elsif ($count > $next_update) { } |
490
|
0 |
0 |
if $$self{'showProgressBar'} |
509
|
0 |
0 |
if (/^8: THE GENRES LIST/o) { } |
|
0 |
0 |
elsif ($lineCount > 1000) { } |
510
|
0 |
0 |
unless ($_ = <$fh> and /^===========/o) |
515
|
0 |
0 |
unless ($_ = <$fh> and /^\s*$/o) |
529
|
0 |
0 |
if $$self{'showProgressBar'} |
534
|
0 |
0 |
if $$self{'showProgressBar'} |
535
|
0 |
0 |
if $$self{'showProgressBar'} |
550
|
0 |
0 |
if $line =~ /^\-\-\-\-\-\-\-+/o |
551
|
0 |
0 |
if $line =~ /\s*\{\{SUSPENDED\}\}/o |
558
|
0 |
0 |
if ($tab != -1) { } |
573
|
0 |
0 |
if ($$self{'imdbMovie2DBKey'}{$mkey}) |
575
|
0 |
0 |
unless (defined $$self{'GenreID'}{$genre}) |
584
|
0 |
0 |
if ($count % 50000 == 0) |
589
|
0 |
0 |
if ($$self{'showProgressBar'}) |
591
|
0 |
0 |
if ($count > $countEstimate) { } |
|
0 |
0 |
elsif ($count > $next_update) { } |
606
|
0 |
0 |
if $$self{'showProgressBar'} |
621
|
0 |
0 |
if ($whichCastType eq 'Actors') |
622
|
0 |
0 |
if ($DB->table_row_count('Actors') > 0 or $DB->table_row_count('Titles2Actors') > 0 or $DB->table_row_count('Titles2Hosts') > 0 or $DB->table_row_count('Titles2Narrators') > 0) |
638
|
0 |
0 |
if ($whichCastType eq 'Actors') { } |
|
0 |
0 |
elsif ($whichCastType eq 'Actresses') { } |
651
|
0 |
0 |
if $$self{'showProgressBar'} |
655
|
0 |
0 |
if $$self{'showProgressBar'} |
656
|
0 |
0 |
if $$self{'showProgressBar'} |
661
|
0 |
0 |
if (/^$header/) { } |
|
0 |
0 |
elsif ($lineCount > 1000) { } |
662
|
0 |
0 |
unless ($_ = <$fh> and /^===========/o) |
667
|
0 |
0 |
unless ($_ = <$fh> and /^\s*$/o) |
672
|
0 |
0 |
unless ($_ = <$fh> and /^Name\s+Titles\s*$/o) |
677
|
0 |
0 |
unless ($_ = <$fh> and /^[\s\-]+$/o) |
700
|
0 |
0 |
unless (defined $cur_actorId) |
712
|
0 |
0 |
if $line =~ /^\-\-\-\-\-\-\-+/o |
714
|
0 |
0 |
if length $line == 0 |
717
|
0 |
0 |
if $line =~ /\s*\{\{SUSPENDED\}\}/o |
723
|
0 |
0 |
if ($line =~ s/\s*<(\d+)>//o) |
725
|
0 |
0 |
if $billing > 3 |
728
|
0 |
0 |
if ($line =~ s/^([^\t]+)\t+//o) |
738
|
0 |
0 |
if ($$self{'showProgressBar'}) |
740
|
0 |
0 |
if ($castNames > $castCountEstimate) { } |
|
0 |
0 |
elsif ($castNames > $next_update) { } |
752
|
0 |
0 |
if ((my $start = index($line, ' [')) != -1) |
756
|
0 |
0 |
if ($ex =~ s/Host//o) |
759
|
0 |
0 |
if ($ex =~ s/Narrator//o) |
767
|
0 |
0 |
if ($line =~ s/\s*\(aka ([^\)]+)\).*$//o) |
772
|
0 |
0 |
if ($line =~ s/ (\(.*)$//o) |
779
|
0 |
0 |
if ($line =~ s/\s+Narrator$//o) |
789
|
0 |
0 |
if ($titleID) { } |
790
|
0 |
0 |
if ($isHost) |
793
|
0 |
0 |
if ($isNarrator) |
796
|
0 |
0 |
unless ($isHost or $isNarrator) |
801
|
0 |
0 |
if ($count % 50000 == 0) |
809
|
0 |
0 |
if $$self{'showProgressBar'} |
827
|
0 |
0 |
if ($DB->table_row_count('Directors') > 0 or $DB->table_row_count('Titles2Directors') > 0) |
835
|
0 |
0 |
if $$self{'showProgressBar'} |
839
|
0 |
0 |
if $$self{'showProgressBar'} |
840
|
0 |
0 |
if $$self{'showProgressBar'} |
844
|
0 |
0 |
if (/^THE DIRECTORS LIST/) { } |
|
0 |
0 |
elsif ($lineCount > 1000) { } |
845
|
0 |
0 |
unless ($_ = <$fh> and /^===========/o) |
850
|
0 |
0 |
unless ($_ = <$fh> and /^\s*$/o) |
855
|
0 |
0 |
unless ($_ = <$fh> and /^Name\s+Titles\s*$/o) |
860
|
0 |
0 |
unless ($_ = <$fh> and /^[\s\-]+$/o) |
892
|
0 |
0 |
if $line =~ /^\-\-\-\-\-\-\-+/o |
893
|
0 |
0 |
if length $line == 0 |
896
|
0 |
0 |
if $line =~ /\s*\{\{SUSPENDED\}\}/o |
900
|
0 |
0 |
if ($line =~ s/^([^\t]+)\t+//o) |
904
|
0 |
0 |
if ($$self{'showProgressBar'}) |
906
|
0 |
0 |
if ($castNames > $castCountEstimate) { } |
|
0 |
0 |
elsif ($castNames > $next_update) { } |
927
|
0 |
0 |
if ($line =~ s/ (\(.*)$//o) |
934
|
0 |
0 |
if ($$self{'imdbMovie2DBKey'}{$line}) { } |
936
|
0 |
0 |
unless (defined $found{$cur_name}) |
947
|
0 |
0 |
if ($count % 50000 == 0) |
955
|
0 |
0 |
if $$self{'showProgressBar'} |
972
|
0 |
0 |
if ($DB->table_row_count('Ratings') > 0) |
980
|
0 |
0 |
if (/^MOVIE RATINGS REPORT/o) { } |
|
0 |
0 |
elsif ($lineCount > 1000) { } |
981
|
0 |
0 |
unless ($_ = <$fh> and /^\s*$/o) |
986
|
0 |
0 |
unless ($_ = <$fh> and /^New Distribution Votes Rank Title/o) |
1000
|
0 |
0 |
if $$self{'showProgressBar'} |
1005
|
0 |
0 |
if $$self{'showProgressBar'} |
1006
|
0 |
0 |
if $$self{'showProgressBar'} |
1021
|
0 |
0 |
if $line =~ /^\s*$/o |
1023
|
0 |
0 |
if $line =~ /^\-\-\-\-\-\-\-+/o |
1029
|
0 |
0 |
if ($line =~ /^\s+([\.|\*|\d]+)\s+(\d+)\s+(\d+\.\d+)\s+(.+)$/o) { } |
1031
|
0 |
0 |
if ($$self{'imdbMovie2DBKey'}{$4}) |
1034
|
0 |
0 |
if ($countImported % 50000 == 0) |
1042
|
0 |
0 |
if ($$self{'showProgressBar'}) |
1044
|
0 |
0 |
if ($count > $countEstimate) { } |
|
0 |
0 |
elsif ($count > $next_update) { } |
1057
|
0 |
0 |
if $$self{'showProgressBar'} |
1074
|
0 |
0 |
if ($DB->table_row_count('Keywords') > 0) |
1083
|
0 |
0 |
if (/THE KEYWORDS LIST/) { } |
|
0 |
0 |
elsif ($lineCount > 200000) { } |
1084
|
0 |
0 |
unless ($_ = <$fh> and /^===========/o) |
1089
|
0 |
0 |
unless ($_ = <$fh> and /^\s*$/o) |
1103
|
0 |
0 |
if $$self{'showProgressBar'} |
1108
|
0 |
0 |
if $$self{'showProgressBar'} |
1109
|
0 |
0 |
if $$self{'showProgressBar'} |
1124
|
0 |
0 |
if $line =~ /^\s*$/ |
1129
|
0 |
0 |
if (defined $title and defined $keyword) { } |
1133
|
0 |
0 |
if ($$self{'imdbMovie2DBKey'}{$title}) |
1134
|
0 |
0 |
unless (defined $found{$keyword}) |
1145
|
0 |
0 |
if ($countImported % 50000 == 0) |
1150
|
0 |
0 |
if ($$self{'showProgressBar'}) |
1152
|
0 |
0 |
if ($count > $countEstimate) { } |
|
0 |
0 |
elsif ($count > $next_update) { } |
1165
|
0 |
0 |
if $$self{'showProgressBar'} |
1181
|
0 |
0 |
if ($DB->table_row_count('Plots') > 0) |
1190
|
0 |
0 |
if (/PLOT SUMMARIES LIST/) { } |
|
0 |
0 |
elsif ($lineCount > 500) { } |
1191
|
0 |
0 |
unless ($_ = <$fh> and /^===========/o) |
1196
|
0 |
0 |
unless ($_ = <$fh> and /^-----------/o) |
1210
|
0 |
0 |
if $$self{'showProgressBar'} |
1215
|
0 |
0 |
if $$self{'showProgressBar'} |
1216
|
0 |
0 |
if $$self{'showProgressBar'} |
1226
|
0 |
0 |
if $line =~ /^\s*$/ |
1227
|
0 |
0 |
if $line =~ /\s*\{\{SUSPENDED\}\}/o |
1232
|
0 |
0 |
if (defined $title) { } |
1243
|
0 |
0 |
if $l =~ /^\s*$/ |
1245
|
0 |
0 |
if ($l =~ /PL:\s(.*)$/) |
1246
|
0 |
0 |
$plot ne '' ? : |
1249
|
0 |
0 |
if ($l =~ /BY:\s(.*)$/ or $l =~ /^(\-\-\-\-\-\-\-\-)/o) |
1253
|
0 |
0 |
if ($token eq '--------') |
1254
|
0 |
0 |
if ($plot eq '') |
1260
|
0 |
0 |
if ($$self{'imdbMovie2DBKey'}{$line}) { } |
1264
|
0 |
0 |
if ($count % 50000 == 0) |
1275
|
0 |
0 |
if ($token eq '--------') |
1281
|
0 |
0 |
if (length $plot) |
1285
|
0 |
0 |
if ($$self{'showProgressBar'}) |
1287
|
0 |
0 |
if ($count > $countEstimate) { } |
|
0 |
0 |
elsif ($count > $next_update) { } |
1297
|
0 |
0 |
unless ($line =~ /^(---|PL:|BY:)/) |
1301
|
0 |
0 |
if ($count > $next_update) |
1302
|
0 |
0 |
if ($$self{'showProgressBar'}) |
1309
|
0 |
0 |
if $$self{'showProgressBar'} |
1324
|
0 |
0 |
unless open INFO, "< $file" |
1327
|
0 |
0 |
if (s/^([^:]+)://o) |
1340
|
0 |
0 |
if (ref $info ne 'HASH') |
1356
|
0 |
0 |
if (defined $$self{'dbinfo'}{$key}) |
1365
|
0 |
0 |
unless open INFO, "> $$self{'moviedbInfo'}" |
1378
|
0 |
0 |
unless (defined $$self{'listFiles'}->paths_isset($key)) |
1382
|
0 |
0 |
unless (-f $filePath) |
1389
|
0 |
0 |
if ($filePath =~ /.gz$/) |
1390
|
0 |
0 |
if (open my $fd, "gzip -l $filePath |") { } |
1395
|
0 |
0 |
if (/^\s*\d+\s+(\d+)/) |
1413
|
0 |
0 |
if (defined $file) { } |
1414
|
0 |
0 |
unless (open $$self{'logfd'}, "> $file") |
1437
|
0 |
0 |
if (-f "$$self{'imdbDir'}/stage-$type.log") |
1450
|
0 |
0 |
if ($type eq 'movies') |
1460
|
0 |
0 |
unless ($self->_redirect(sprintf("%s/stage-$type.log", $$self{'imdbDir'}))) |
1464
|
0 |
0 |
unless ($DB->connect) |
1488
|
0 |
0 |
unless (grep /^$type$/, $self->listTypes) |
1523
|
0 |
0 |
unless (-f $$self{'listFiles'}->paths_index($type)) |
1528
|
0 |
0 |
if ($type eq 'movies') |
1535
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.1) { } |
1536
|
0 |
0 |
if ($num == -2) |
1546
|
0 |
0 |
unless open OUT, "> $$self{'imdbDir'}/titles.tsv" |
1561
|
0 |
0 |
unless (defined $$self{'imdbMovie2DBKey'}) |
1565
|
0 |
0 |
unless open IN, "< $$self{'imdbDir'}/titles.tsv" |
1568
|
0 |
0 |
if (/^(\d+)\t(.+)/o) |
1577
|
0 |
0 |
if ($type eq 'directors') |
1584
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.1) { } |
1585
|
0 |
0 |
if ($num == -2) |
1602
|
0 |
0 |
if ($type eq 'actors') |
1610
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.1) { } |
1611
|
0 |
0 |
if ($num == -2) |
1624
|
0 |
0 |
if ($type eq 'actresses') |
1628
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.1) { } |
1629
|
0 |
0 |
if ($num == -2) |
1646
|
0 |
0 |
if ($type eq 'genres') |
1652
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.1) { } |
1653
|
0 |
0 |
if ($num == -2) |
1670
|
0 |
0 |
if ($type eq 'ratings') |
1676
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.1) { } |
1677
|
0 |
0 |
if ($num == -2) |
1694
|
0 |
0 |
if ($type eq 'keywords') |
1701
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.05) { } |
1702
|
0 |
0 |
if ($num == -2) |
1720
|
0 |
0 |
if ($type eq 'plot') |
1725
|
0 |
0 |
if ($num < 0) { } |
|
0 |
0 |
elsif (abs $num - $countEstimate > $countEstimate * 0.05) { } |
1726
|
0 |
0 |
if ($num == -2) |
1765
|
0 |
0 |
if ($self->_importListFile($DB, $type) != 0) |
1790
|
0 |
0 |
if ($self->importList($type) != 0) |
1809
|
0 |
0 |
unless ($DB->connect) |
1824
|
0 |
0 |
if ($self->dbinfoSave) |
1833
|
0 |
0 |
if (-e "$$self{'moviedbOffline'}") |
1837
|
0 |
0 |
if (my $errline = $imdb->sanityCheckDatabase) |
1838
|
0 |
0 |
unless open OFF, "> $$self{'moviedbOffline'}" |
1844
|
0 |
0 |
if (ref $info eq 'HASH') { } |
1855
|
0 |
0 |
unless open OFF, "< $$self{'moviedbOffline'}" |