diff --git a/Dockerfile b/Dockerfile
index ef9cdb2..c4b1c5f 100644
--- a/Dockerfile
+++ b/Dockerfile
@@ -2,3 +2,6 @@ FROM alpine
 # docker build -t fooflington/mythic-beasts-dns .
 LABEL maintainer="Matthew Slowe <foo@mafoo.org.uk>"
 RUN apk --no-cache add perl perl-yaml perl-lwp-protocol-https perl-json perl-uri perl-yaml-tiny perl-www-form-urlencoded
+
+COPY manage-dns.pl /docker-entry-point.pl
+ENTRYPOINT ["perl", "/docker-entry-point.pl"]
\ No newline at end of file
diff --git a/manage-dns.pl b/manage-dns.pl
old mode 100644
new mode 100755
index 0e75687..a6907bd
--- a/manage-dns.pl
+++ b/manage-dns.pl
@@ -1,6 +1,7 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/perl
 
 use strict;
+use warnings;
 use LWP::UserAgent;
 use Data::Dumper;