in reply to Splitting data in a variable
use warnings; use strict; my $line = 'M6608BBBBQYMNM1000.data:0x4443018d D debug_mode'; if ($line =~ /(0x[[:xdigit:]]+)/) { print "$1\n"; } __END__ 0x4443018d [download]