$variable =~ s/\0\z//;