Code cleanup

1 files changed, 2 insertions, 4 deletions

diff --git a/lib/App/Dthumb/Data.pm.PL b/lib/App/Dthumb/Data.pm.PL
index a0fb4f5..13b244b 100644
--- a/lib/App/Dthumb/Data.pm.PL
+++ b/lib/App/Dthumb/Data.pm.PL
@@ -13,7 +13,7 @@ opendir(my $share_dh, 'share');
 print {$out_fh} <DATA>;
 
 for my $file (readdir($share_dh)) {
-	if (substr($file, 0, 1) eq '.') {
+	if (substr($file, 0, 1) eq q{.}) {
 		next;
 	}
 
@@ -21,7 +21,7 @@ for my $file (readdir($share_dh)) {
 	my $content = do { local $/ = undef; <$fh> };
 	close($fh);
 
-	if ($file =~ qr{ \. (png | gif) $ }ox) {
+	if ($file =~ qr{ [.] (png | gif) $ }ox) {
 		$content = encode_base64($content);
 	}
 
@@ -67,12 +67,10 @@ This manual documents B<App::Dthumb::Data> version 0.2
 
 use strict;
 use warnings;
-use base 'Exporter';
 
 use Data::Section -setup;
 use MIME::Base64 qw(decode_base64);
 
-our @EXPORT_OK = ();
 our $VERSION = '0.2';