Select Code to Download

  sub cprintf {system('/usr/bin/printf', @_)}

 cprintf("There are at least %'d ways to do it!\n", 42e6)

  sub cprintf {
    my($fmt)= shift;
    $fmt=~s/%(-?\d*)d/%'$1d/g;
    system('/usr/bin/printf', $fmt, @_)
  }

  system('/usr/bin/printf', 
         'Bash uses backtics for cmd substitution, eg: %s',
         '`ls *`')

  Bash uses backtics for cmd substitution, eg: `ls *`

   system(
'/bin/printf "Bash uses backtics for cmd substitution, eg: %s" `ls *`'
           )