I think you have 2 options:
1) Use Import
instead of Get
:
In[131]:= ExampleData[{"Text", "AliceInWonderland"}] >> "~/alice.m"
(* From the command line:
$ gzip ~/alice.m *)
In[136]:= Import@"~/alice.m.gz" // StringTake[#, 100] &
Out[136]= "I--DOWN THE RABBIT-HOLE Alice was beginning to get very tired of sitting by \
her sister on the bank, "
2) Comprress
the data first, then use Put
:
In[137]:= Compress[ExampleData[{"Text", "AliceInWonderland"}]] >> "~/alice-compressed.m"
In[139]:= Uncompress[Get@"~/alice-compressed.m"] // StringTake[#, 100] &
Out[139]= "I--DOWN THE RABBIT-HOLE Alice was beginning to get very tired of sitting by \
her sister on the bank, "