commit ddb4c3cdfe782392a521cb7959c3ce31889a7820 Author: Alex 'AdUser' Z Date: Mon Feb 16 18:12:59 2015 +1000 + initial diff --git a/lib/Subtitle/ASS.pm b/lib/Subtitle/ASS.pm new file mode 100644 index 0000000..76fbf79 --- /dev/null +++ b/lib/Subtitle/ASS.pm @@ -0,0 +1,9 @@ +package Subtitle::ASS; + +use strict; +use warnings; +use utf8; + +use Carp; + +1; diff --git a/lib/Subtitle/ASS/Events.pm b/lib/Subtitle/ASS/Events.pm new file mode 100644 index 0000000..e69de29 diff --git a/lib/Subtitle/ASS/Header.pm b/lib/Subtitle/ASS/Header.pm new file mode 100644 index 0000000..e69de29 diff --git a/lib/Subtitle/ASS/Media.pm b/lib/Subtitle/ASS/Media.pm new file mode 100644 index 0000000..e69de29 diff --git a/lib/Subtitle/ASS/Styles.pm b/lib/Subtitle/ASS/Styles.pm new file mode 100644 index 0000000..e69de29 diff --git a/lib/Subtitle/SRT.pm b/lib/Subtitle/SRT.pm new file mode 100644 index 0000000..cbed6ef --- /dev/null +++ b/lib/Subtitle/SRT.pm @@ -0,0 +1,21 @@ +package Subtitle::SRT; + +use strict; +use warnings; +use utf8; + +sub new { + my ($class) = @_; + my $self = { events => [] }; + + return bless($self, $class); +} + +sub load { + my ($self, $file) = @_; + my $cnt = 0; + + return $cnt; +} + +1;