diff --git a/lib/Slic3r/GUI/Plater.pm b/lib/Slic3r/GUI/Plater.pm
index 275cf287e..15eded1be 100644
--- a/lib/Slic3r/GUI/Plater.pm
+++ b/lib/Slic3r/GUI/Plater.pm
@@ -1867,7 +1867,7 @@ sub send_gcode {
         }else{
             # slurp the file we would send into a string - should be someplace to reference this but could not find it?
             local $/=undef;
-            open my $gch,$path;
+            open my ($gch,$path);
             my $gcode=<$gch>;
             close($gch);