diff --git a/PBot/Commands.pm b/PBot/Commands.pm
index e4816a30..760f5c8f 100644
--- a/PBot/Commands.pm
+++ b/PBot/Commands.pm
@@ -123,6 +123,7 @@ sub interpreter {
 
 sub parse_arguments {
   my ($self, $arguments) = @_;
+  $arguments =~ s/(?<!\\)'/\\'/g;
   return shellwords($arguments);
 }