From 1f58d5e67d5670089f30aabc5b7f655c15793fce Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Sat, 6 Jun 2009 15:39:14 -0500
Subject: class skeleton

---
 lib/Lingua/HI/Romanize.pm | 46 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 46 insertions(+)
 create mode 100644 lib/Lingua/HI/Romanize.pm

(limited to 'lib')

diff --git a/lib/Lingua/HI/Romanize.pm b/lib/Lingua/HI/Romanize.pm
new file mode 100644
index 0000000..8319b2a
--- /dev/null
+++ b/lib/Lingua/HI/Romanize.pm
@@ -0,0 +1,46 @@
+package Lingua::HI::Romanize;
+use strict;
+use warnings;
+use utf8;
+
+sub new {
+    my $class = shift;
+    my %args = @_;
+    return bless {
+        unicode         => $args{unicode},
+        default_unicode => 'iast',
+        default_ascii   => 'itrans',
+    }, $class;
+}
+
+sub romanize {
+    my $self = shift;
+    my $method = "romanize_";
+    if ($self->{unicode}) {
+        $method .= $self->{default_unicode};
+    }
+    else {
+        $method .= $self->{default_ascii};
+    }
+    return $self->$method(@_);
+}
+
+sub romanize_iast {
+}
+
+sub romanize_kolkata {
+}
+
+sub romanize_iso15919 {
+}
+
+sub romanize_harvard_kyoto {
+}
+
+sub romanize_itrans {
+}
+
+sub romanize_velthuis {
+}
+
+1;
-- 
cgit v1.2.3-54-g00ecf