Back to task

88 symbols perl
Wed Sep 23 18:30:15 2015 dmitry-tiger
#!/usr/bin/perl -anl
print join("",sort$F[0]=~/(.)/g)eq join("",sort$F[1]=~/(.)/g)?"true":"false" if $#F;


Leave a comment

Parsed as Markdown

Login to leave a comment