помочь настроить регулярное выражение в Perl

Question

Может кто-нибудь помочь мне настроить это регулярное выражение?Он захватывает 72.49 GB, и меня интересует ТОЛЬКО значение 72.49

$line =~ m/(backup-size)[:=](.+)/

Raw String:

Tue Jan 04 05:45:34 2011: db2.mil.mad:backup:INFO: backup-size=72.49 GB

Answer 1

Попробуйте:

$line =~ m/backup-size[:=]([\d.]+) GB/;

Чтобы выбрать размер и единицу измерения в отдельных группах:

$line =~ m/backup-size[:=]([\d.]+) (.B)/;

Answer 2

$line =~ m/backup-size[:=](\d+\.?\d*)\s*[KMG]B/i;