Mega Code Archive

 

Categories / Perl / Language Basics

 

Scalar alias

#!/usr/bin/perl -w use strict; our $scalar1="one"; *scalar2=\$scalar1; our $scalar2="two"; print $scalar1;