I agree that
split is probably the most elegant. (You could also do this with regex and the binding operator.)
Code:
my $string = qq/this is not:here we go:now don't do/ ;
# Take a slice from split()
#
my $extract = (split(/:/, $string))[1] ;
print $extract . "\n" ;