This won't even compile:
- you have C++ style comments
- you have either forgotten the { } or tried to use the postfix modifier syntax but put the unless first
- you declare a scalar ($record) and use a hash (%record)
- there's a missing )

Also $record == {} checks if the hash in $record has the same address/ID as a brand new, and different hash. This is always false.