Skip to content

Instantly share code, notes, and snippets.

Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save holli-holzer/1a04256e9c536081f5c096df2a87184d to your computer and use it in GitHub Desktop.
Save holli-holzer/1a04256e9c536081f5c096df2a87184d to your computer and use it in GitHub Desktop.
bug in perl6 shell command?
#This code
my $bookFile ="2774.epub";
my $bookUrl = "http://93.174.95.27/foreignfiction/get.php?md5=5d3ef26e36584edd9b2434deaced6a55&key=3XD005UYYM2SP81G";
say qq[curl -o $bookFile "$bookUrl"];
shell qq[curl -o $bookFile "$bookUrl"];
#when run it produces the error. note the extra quote ( ""http" )
D:\P6>perl6 t.p6
curl -o 2774.epub "http://93.174.95.27/foreignfiction/get.php?md5=5d3ef26e36584edd9b2434deaced6a55&key=3XD005UYYM2SP81G"
curl: (1) Protocol ""http" not supported or disabled in libcurl
The spawned command 'curl -o 2774.epub "http://93.174.95.27/foreignfiction/get.php?md5=5d3ef26e36584edd9b2434deaced6a55&key=3XD005UYYM2SP81G"' exited unsuccessfully (exit code: 1)
in block <unit> at t.p6 line 4
#however this works
D:\P6>curl -o 2774.epub "http://93.174.95.27/foreignfiction/get.php?md5=5d3ef26e36584edd9b2434deaced6a55&key=3XD005UYYM2SP81G"
% Total % Received % Xferd Average Speed Time Time Time Current
Dload Upload Total Spent Left Speed
100 1538k 100 1538k 0 0 600k 0 0:00:02 0:00:02 --:--:-- 600k
D:\P6>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment