Select Code to Download

given fork {
  case $_ < 0 {
...
    #child
  }
}

if ((my $pid = fork()) < 0){
   #error
...
} else {
   $child
}

if (get_the_boundary_x() < the_user_provided_x()){
   draw_color("green");
...
else {
   draw_color("red");
}