fork download
  1. #!perl -p
  2. @{$.}=sort/./g}{$_="@1"eq"@2"?true:false
Success #stdin #stdout 0s 6056KB
stdin
boat
toba
stdout
true