We'll see if we get a response to the most recently opened issue on Github https://github.com/prusa3d/Slic3r/issues/935. I'm not too hopeful that the Prusa version will ever add in support for the Duet. I ended up making a post processing script that uploads the gcode file. The script is basically just the perl code that slic3r usually uses to upload files.
#!/usr/bin/perl -i
use strict;
use warnings;
use LWP::UserAgent;
use File::Slurp;
use File::Basename;
# Set up filepath and filename
my $filepath = $ARGV[0];
$filepath =~ tr|\\|/|;
my $filename = basename($filepath);
my $ua = LWP::UserAgent->new;
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
my $t = sprintf("%4d-%02d-%02dT%02d:%02d:%02d",$year+1900,$mon+1,$mday,$hour,$min,$sec);
my $server_endpoint = "http://192.168.X.XX/rr_upload?name=gcodes/$filename&time=$t";
my $req = HTTP::Request->new(POST => $server_endpoint);
my $data_file = read_file( $filepath, { binmode => ':raw' } );
$req->content($data_file);
my $resp = $ua->request($req);
if ($resp->is_success) {
my $message = $resp->decoded_content;
print "Received reply: $message\n";
}else {
print "HTTP POST error code: ", $resp->code, "\n";
print "HTTP POST error message: ", $resp->message, "\n";
}
You'll have to put the address of your Duet where the "XXX" are in the $server_endpoint var. I run all my post processing scripts from a windows bat file which looks sort of like this at the end:
pause
perl "C:\Program Files\Slic3r\uploadgcodefile.pl" %1
del /f %1
pause
The bat file uploads the gcode file and then deletes it. The first pause allows me to close the command window to cancel the upload/delete command. The last pause allows me to verify the upload worked.
This process definitely isn't perfect, but is easier than manually uploading files.
