Mad Libs: Difference between revisions
m
→{{header|Sidef}}: modified code to work with the latest version of Sidef
(→{{header|Perl 6}}: modernize) |
m (→{{header|Sidef}}: modified code to work with the latest version of Sidef) |
||
Line 2,169:
var blanks = Hash.new;
while (
blanks.append(
}
blanks.keys.sort.each { |blank|
var replacement = Sys.scanln("#{blank}: ");
blanks
}
print story.gsub(/<(.*?)>/, {|s1| blanks
=={{header|Tcl}}==
|