in reply to REGEX Frustration

my ($amount) = $line =~ /([^\t]+)$/;

[download]

In Section Seekers of Perl Wisdom