Wed Nov 15 09:36:34 2017
python3
def p(r,t,b,x=1):
 m=map;o=[' ']*max(m(len,(t,r)));p=o[:];t,n=list(t),1
 for s in b.split(", "):
  e,b,*_=m(int,(s+":"+s).split(":"));s=slice(-e-1,-b or 99);d=e-b+1;p[s]=e>b and"/%s\\"%("-"*(d-2))or"^";o[-e-1]=str(n);n+=1
  if x:t+=r[s]
  else:t[s],r=r[:d],r[d:]
 return[''.join(x).rstrip()for x in(o,p,t)]
i=input
f,g=i().split(" ")
o,s,r=p(g,"",i().split(": ",1)[1])
t,*_,u=i().split(" ")
print('\n'.join([f,o,s,g,"","="+r,"",t]+p(r,u,i().split(": ",1)[1],0)))
Wed Nov 15 09:22:43 2017
python3

From:
3 2    1 
^ /-\  /\
010011010

=100010

To:
 1       
 /----\  
010001000
instead of
From:
3 2    1
^ /-\  /\
010011010

=100010

To:
 1
 /----\
010001000
def p(r,t,b,x=1):
 m=map;o=[' ']*max(m(len,(t,r)));p=o[:];t=l(t);n=1
 for _s in b.split(", "):
  e,b,*_=m(int,(_s+":"+_s).split(":"));_s=slice(-e-1,-b or 99)
  d=e-b+1;p[_s]=e>b and"/%s\\"%("-"*(d-2))or"^";o[-e-1]=str(n)
  if x:t+=r[_s]
  else:t[_s],r=r[:d],r[d:]
  n+=1
 return l(m(''.join,(o,p,t)))
i,l=input,list
f,g=i().split(" ")
o,s,r=p(g,"",i().split(": ",1)[1])
t,*_,u=i().split(" ")
print('\n'.join([f,o,s,g,"","="+r,"",t]+p(r,u,i().split(": ",1)[1],0)))

code:1:8: Couldn't match expected type ‘IO String’ with actual type ‘a0 -> [String]’ In the first argument of ‘(>>=)’, namely ‘lines . getContents’ In the expression: lines . getContents >>= putStr In an equation for ‘main’: main = lines . getContents >>= putStr code:1:14: Couldn't match expected type ‘a0 -> String’ with actual type ‘IO String’ In the second argument of ‘(.)’, namely ‘getContents’ In the first argument of ‘(>>=)’, namely ‘lines . getContents’

main = lines.getContents >>= putStr

3
instead of
30
print`$^X -pMutf8 -C -E'y/三四五六七八九十/3-90/;s}0$}}}'`
print`$^X -pMutf8 -C -E'y/三四五六七八九十/3-90/;s/0\\B//'`
print`$^X -pMutf8 -C -E'y/三四五六七八九十/3-9/d;s/^3\$/30/'`

3
instead of
30
print`$^X -pMutf8 -C -E'y/三四五六七八九十/3-9/d'`

308
instead of
38
print`$^X -pMutf8 -C -E'y/三四五六七八九十/3-9/d;s/^3/30/'`
Wed Aug 2 09:10:24 2017
haskell
main=interact$show.sum.map read.lines
Wed Aug 2 09:06:17 2017
haskell
main=interact$show.(+0).minimum.map read.lines
Wed Aug 2 09:03:25 2017
haskell
main=interact$show.minimum.map((+0).read).lines
Wed Aug 2 08:58:38 2017
haskell
main=interact$show.minimum.tail.(0:).map read.lines
Thu Jul 20 06:17:42 2017
haskell

code:1:1: Parse error: naked expression at top level Perhaps you intended to use TemplateHaskell

(fmap (+)) getLine getLine >>= print
Thu Jul 20 06:17:02 2017
perl

Bareword found where operator expected at ./code line 1, near ") getLine" (Missing operator before getLine?) syntax error at ./code line 1, near ") getLine getLine " Execution of ./code aborted due to compilation errors.

fmap (\a b -> a + b) getLine getLine >>= print
Tue Jun 27 12:12:37 2017
perl

0 7038 7038
instead of
test2
print "$( $> $<"
Sun Jun 25 16:19:48 2017
perl

syntax error at ./code line 1, near "0:" Execution of ./code aborted due to compilation errors.

0:2:3
Sun Jun 25 09:38:50 2017
golfscript
~]$0=
Sun Jun 25 09:28:34 2017
golfscript
~+
Sun Jun 25 09:17:56 2017
ruby
a=gets.upcase.gsub ' ',''
p a.sum-64*a.size
Sun Jun 25 09:11:09 2017
golfscript

898
instead of
900
~]{-}*