my ($extension) = $pubload =~ /\.(\w+)$/;