diff --git a/scripts/cleanup.pl b/scripts/cleanup.pl
index df6b095..a08ee93 100755
--- a/scripts/cleanup.pl
+++ b/scripts/cleanup.pl
@@ -57,7 +57,7 @@ print "Cleaning up Minio\n";
 foreach my $line (@dirs_out)
 {
   print "Checking if $line is in @commits_out\n\n";
-  chop(line);
+  chop($line);
   if ( ! grep( /^$line$/, @commits_out ) ) {
     my $cmd = "rclone purge badhouseplants-minio:/badhouseplants-net/$line";
     print "Removing ${line}\n\n";