#!/usr/bin/perl -w
use strict;
use Sort::Naturally;

print for nsort(<DATA>);

__DATA__
text1
text69.something-14-14
text2
text37
text5
text3
text10
text11

##</code><code>##

text1
text2
text3
text5
text10
text11
text37
text69.something-14-14