VAR=myvar; export VAR; cat file | perl -n0e 'BEGIN{$var = $ENV{VAR}} #more code'