#!/usr/bin/perl my $text = "Nuera Communications, Inc., ProductFamily: ORCA Series, Product: RDT-8, SoftwareVersion: rdtg7.0.4.7, HardwareRevision:"; $text =~ /SoftwareVersion: (.+),/ig; print $1, "\n";