From ddb4c3cdfe782392a521cb7959c3ce31889a7820 Mon Sep 17 00:00:00 2001 From: Alex 'AdUser' Z Date: Mon, 16 Feb 2015 18:12:59 +1000 Subject: [PATCH] + initial --- lib/Subtitle/ASS.pm | 9 +++++++++ lib/Subtitle/ASS/Events.pm | 0 lib/Subtitle/ASS/Header.pm | 0 lib/Subtitle/ASS/Media.pm | 0 lib/Subtitle/ASS/Styles.pm | 0 lib/Subtitle/SRT.pm | 21 +++++++++++++++++++++ 6 files changed, 30 insertions(+) create mode 100644 lib/Subtitle/ASS.pm create mode 100644 lib/Subtitle/ASS/Events.pm create mode 100644 lib/Subtitle/ASS/Header.pm create mode 100644 lib/Subtitle/ASS/Media.pm create mode 100644 lib/Subtitle/ASS/Styles.pm create mode 100644 lib/Subtitle/SRT.pm 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;