RosettaCodeData/Task/Command-line-arguments/Pure/command-line-arguments.pure

using system;

printf "There are %d command line argumants\n" argc;
puts "They are " $$ map (puts) argv;