How do you use Storable and serialization with a short example?

In Perl, the Storable module is a convenient way to serialize and deserialize data structures. This allows you to store complex data types, such as arrays and hashes, in a binary format. Here's a short example demonstrating how to use Storable for serialization and deserialization.

use Storable qw(store retrieve); # Example data structure my %data = ( name => 'John Doe', age => 30, skills => ['Perl', 'Python', 'JavaScript'], ); # Serialize and store the data in a file store \%data, 'data_store.pkl'; # Retrieve the serialized data my $retrieved_data = retrieve('data_store.pkl'); # Print retrieved data print "Name: $retrieved_data->{name}\n"; print "Age: $retrieved_data->{age}\n"; print "Skills: " . join(', ', @{$retrieved_data->{skills}}) . "\n";

Perl Storable serialization deserialization data structures