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