my $filename = (split /\s+/, $string)[-1];
print $filename, "\n";