diff --git a/lib/commands/fav.pm b/lib/commands/fav.pm index abebf127e82448057ad2fa6bdfb30513d9f70a0e..8a8d134e03e754d4f028fa94445f72a1e3cc67b2 100644 --- a/lib/commands/fav.pm +++ b/lib/commands/fav.pm @@ -1,9 +1,5 @@ package commands::fav; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(exec); - our $dbh; our $log; our $irc; diff --git a/lib/commands/get.pm b/lib/commands/get.pm index e717ae2cd7f9f135ed053b66d15bb2f040fcce1c..4ad4a294b40ab76bcdd278ae1aa457b6e5c9642f 100644 --- a/lib/commands/get.pm +++ b/lib/commands/get.pm @@ -1,9 +1,5 @@ package commands::get; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(exec); - use strict; use warnings; use Scalar::Util qw(looks_like_number); diff --git a/lib/commands/later.pm b/lib/commands/later.pm index 59367e0f6294657bf61b4612b00e8a82d023deb2..49d2868bb325a658cadc34d6c4ec37f893d7eebe 100644 --- a/lib/commands/later.pm +++ b/lib/commands/later.pm @@ -1,9 +1,5 @@ package commands::later; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(exec); - our $dbh; our $log; diff --git a/lib/commands/parser.pm b/lib/commands/parser.pm index ccc6925e1e2a671369d7c3a68ab9cbd16d9b12ed..a97923bfebae884f9a8b867a7e6f71aa4097a171 100644 --- a/lib/commands/parser.pm +++ b/lib/commands/parser.pm @@ -1,9 +1,5 @@ package commands::parser; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(exec); - use strict; use lib "$FindBin::Bin/lib/"; diff --git a/lib/commands/tag.pm b/lib/commands/tag.pm index a99470dafe11840b5453ebffb089d2ae7615d985..85c65412f0b141c43e4152a641f1d1ce42b99a0b 100644 --- a/lib/commands/tag.pm +++ b/lib/commands/tag.pm @@ -1,9 +1,5 @@ package commands::tag; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(exec); - our $dbh; our $log; diff --git a/lib/sites/mixcloud.pm b/lib/sites/mixcloud.pm index 82cec79d0b2cbf7c65caacfc04d6c64c9661deb1..29373b64d1327dd28efc5ed6d6accb725e1c4afd 100644 --- a/lib/sites/mixcloud.pm +++ b/lib/sites/mixcloud.pm @@ -3,11 +3,6 @@ package mixcloud; use LWP::UserAgent; use JSON; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(mixcloud); - - sub get { my ($url) = @_; $url =~ s/www/api/; diff --git a/lib/sites/parser.pm b/lib/sites/parser.pm index 80d09aa91074f50f5bad95efad99b924a512109d..fab14dedab37112f61ec805d9c3ab0725d517b92 100644 --- a/lib/sites/parser.pm +++ b/lib/sites/parser.pm @@ -1,9 +1,5 @@ package sites::parser; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(parse); - use lib "$FindBin::Bin/lib/sites/"; use youtube; use soundcloud; diff --git a/lib/sites/soundcloud.pm b/lib/sites/soundcloud.pm index b72dc01a4aba1b5bd49bb739dc1ec6448920028d..708944acb2bfdc0353860024b4b0a871e75a5b34 100644 --- a/lib/sites/soundcloud.pm +++ b/lib/sites/soundcloud.pm @@ -4,11 +4,6 @@ use LWP::UserAgent; use JSON; use URI::Find; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(soundcloud); - - my $root = 'http://api.soundcloud.com'; my $clientId = 'f4956716fe1a9dc9c3725af822963365'; diff --git a/lib/sites/youtube.pm b/lib/sites/youtube.pm index 7976de8bd96a8b89f8614d33ac843803fd868275..31ddec1a8d62b1b177775ac7bf533fc55c3ba2e6 100644 --- a/lib/sites/youtube.pm +++ b/lib/sites/youtube.pm @@ -5,10 +5,6 @@ use URI::Find; use Encode; require Encode::Detect; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(youtube); - sub get { my $id = shift; diff --git a/lib/sites/zippy.pm b/lib/sites/zippy.pm index 7525e68c5e8a23ffe7fa5f43935765b035d88c35..5bb553f16793585c08971cf5ad296308742d75e3 100644 --- a/lib/sites/zippy.pm +++ b/lib/sites/zippy.pm @@ -4,11 +4,6 @@ use LWP::UserAgent; use HTML::Parser; use HTML::Entities; -require Exporter; -our @ISA = qw(Exporter); -our @EXPORT_OK = qw(zippy); - - my $inTitle = 0; my $inAuthor = 0; my %infos;