Mega Code Archive

 

Categories / Perl / Language Basics

 

Initializing scalars and printing their values

$num = 5; $friend = "AA"; $money = 125.75; $now = localtime();        # localtime() is a Perl function $month = "Jan"; print "$num\n"; print "$friend\n"; print "I need \$$money.\n";    # Protecting our money print qq/$friend gave me \$$money.\n/; print qq/The time is $now\n/; print "${month}uary.\n";    # Curly braces shield the variable print "$month" . "uary.\n"; # Concatenate