5 lines
83 B
Perl
Executable File
5 lines
83 B
Perl
Executable File
#! /usr/bin/perl -w
|
|
|
|
undef $/;
|
|
print join("\n\n", sort split(/\n\n/, <>)), "\n\n";
|