use Sort::Key::Natural 'natkeysort';

my @sorted =
  natkeysort { /src inside:(\d+\.\d+\.\d+\.\d+)/ 
                  ? $1
                  : '0.0.0.0' } @input;