#!/usr/bin/perl

my $var='Aur S-P 250 Pre (Chlorine + cillin (cilli G caine) + Sulfate)';

my @pos=split(/\s\(/,$var);
for(@pos)
{
  print "$_\n";
}

##</code><code>##

Aur S-P 250 Pre
Chlorine + cillin
cilli G caine) + Sulfate)

##</code><code>##

Aur S-P 250 Pre
Chlorine + cillin (cilli G caine) + Sulfate