SHARE
TWEET

Untitled

a guest Jun 4th, 2017 97 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #! /usr/local/bin/perl
  2. #
  3.  
  4.  
  5. my $day = `date +%w`;
  6. print $day;
  7.  
  8. if ( $day = "0" ) { $week_day = "su" }
  9.                         elsif ( $day = "1" ) { $week_day = "mo" }
  10.                         elsif ( $day = "2" ) { $week_day = "tu" }
  11.                         elsif ( $day = "3" ) { $week_day = "we" }
  12.                         elsif ( $day = "4" ) { $week_day = "th" }
  13.                         elsif ( $day = "5" ) { $week_day = "fr" }
  14.                         elsif ( $day = "6" ) { $week_day = "sa" }
  15.  
  16.                         print "$week_day\n";
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top