Tuesday, November 15, 2016

How do you get milliseconds for timestamp in Perl?

use Time::Moment;

print "\n[ @{[Time::Moment->now->strftime('%Y-%m-%d %H:%M:%S.%6N')]} ]";
print "@{[Time::Moment->now->strftime('%Y%m%d%H%M%S%6N')]}\n";

#or

my $time = Time::Moment->new;
print $time->now->strftime('%Y%m%d%H%M%S%6N');

Monday, June 27, 2016

How do you create a jar file on Windows CLI?

1. Start Command Prompt.
2. Navigate to the folder that holds your class files:
   C:\>cd \mywork

3. Set path to include JDK’s bin.  For example:
   C:\mywork> path c:\Program Files\Java\jdk1.7.0_25\bin;%path%

4. Compile your class(es):
   C:\mywork> javac *.java

5. Create a manifest file and your jar file:
   C:\mywork> echo Main-Class: Craps >manifest.txt
   C:\mywork> jar cvfm Craps.jar manifest.txt *.class
  
   or
  
   C:\mywork> jar cvfe Craps.jar Craps *.class

6. Test your jar:
   C:\mywork> Craps.jar

   or

   C:\mywork> java -jar Craps.jar

Wednesday, June 8, 2016

How do you find out files with size more than 1GB in command prompt?

:: 1 GB = 1073741824 KB

forfiles /P E:\Movies\Hollywood\ /M *.* /S /C "cmd /c if @fsize gtr 1073741824 echo @path @fsize @fdate @ftime"

Wednesday, May 4, 2016

How do you pad a string?

use warnings;
use strict;
use 5.010;

my $FName = 'Rabindra';
my $LName = 'Nayak';

my $strlen = length $FName;

if ($strlen < 10) {
    $FName = $FName . ( ' ' x (10 - $strlen) );
}
print "$FName$LName\n";

#or

my $Name = sprintf "%-*s%s", $strlen, $FName, $LName;
print "$Name";

What are the additional delimiters & file extensions acceptable in delimited text file?

Comma (,) - .csv
Tabs (\t) - .tsv
Semi-colons (;)
Pipes (|) - .psv
Carets (^)
Tildes (~)