fork download
  1. #!/usr/bin/perl
  2. $x = "100";
  3. $y = 3;
  4. print $x*$y."\n";
  5.  
  6. if($x == 100){
  7. print "equals\n"
  8. }
Success #stdin #stdout 0s 5608KB
stdin
Standard input is empty
stdout
300
equals