$ echo $PM_1225496

$ PM_1225496=`perl -Mstrict -Mwarnings -ne 'BEGIN { $/ = "{S:{CON:}}" } while (/^.*?\{108\:(\w+)\}\}.*$/g) { print "$1\n" }'`
{1:6392495900}{4:{177:1807300738}{451:1}{405:K22005}{108:8480963411}}{1:6392495900}{2:IVSN}{3:{108:8480963411}}{5:{MAC:00000000}{CHK:9F11}}{S:{CON:}}${1:6392495903}{4:{177:1807300738}{451:1}{405:K22005}{108:8481963413}}{1:6392495903}{2:IVSN}{3:{108:8481963413}}{5:{MAC:00000000}{CHK:12846}}{S:{CON:}}
$ echo $PM_1225496
8480963411 8481963413
$