lolgear

# $file = path to file;
# $name = ( name to search (actually, it is a regex) )
#    EncryptedCoreData:
# -    :commit: 5044489e622143d6efdb69fbbc383748618b5fe4
# +    :commit: 4ca0977e9e0b610e6813886276bb7bbd9406335f
#
#
# Pod revision.

git log -p -- FILE | perl -lne '$name = 'PODNAM'; (/^\s+$name[\w-]*:\s*$/ .. /^\+\s+:commit:/) and print'

lolgear

# find ./AirkeyObjC -name '*.xcworkspace' | grep -v 'xcworkspace/' | grep -v 'xcodeproj' | perl -ln -MFile::Spec -MFile::Basename -e 'chomp; $old = $_; $_ = basename($_); $old = File::Spec->rel2abs($old); $new = File::Spec->rel2abs(qq(./AirkeyObjCProjects/$_)); $t = qx(ln -s $old $new); print $t;'
use File::Spec;
use File::Basename;

sub findInDirectory {
	my $directory = shift;
	[qx(find ./$directory -name '*.xcworkspace' | grep -v 'xcworkspace/' | grep -v 'xcodeproj')];
}

sub copyProjects {

lolgear

ls ./AppIcon.appiconset/*.png | perl -MFile::Basename -ne 'chomp; ($b, $d, $f) = fileparse($_, qr/\.[^.]*/); $s = qx(convert -channel G -separate ${_} ./AppIconPublicBeta.appiconset/${b}.png); print "$s"; print "\n";'
http://www.imagemagick.org/Usage/color_basics/#separate

lolgear

#----- Common functions    	  	  -----#
sub say {
	for (@_){print; print "\n";}
}
sub qxx{
	my $what = shift;
	say qq(I will do $what);
	my $str = qx($what);
	if ($?){
		die "I fall down on < $what >\n! because of < $? >";

lolgear

#!/usr/bin/perl
my $pathToCacheDirectory = qq(~/Library/Developer/Xcode/DerivedData/);

sub TaskToDo{
    my ($refToArgv)=@_;
    die "can't work with too much parameters" unless(scalar(@$refToArgv)==1);
    my $what = shift @$refToArgv;
    my $time = 30; #wait 30 seconds in each iteration
    my $workRef = sub{
        print "i will delete: ";

lolgear

Abstract

This project can be thought of as porting a subset Math::GSL to Parrot.

Details

There are many GSL subsystems, so this project should focus on binding to Special Function, Random Distributions and Cumulative Distribution Functions (CDFs), which have the simplest function signatures. Deliverables will be the implementation, examples, docs and tests.

Schedule

May 27- June 16:

This period I will spent on read documentation to parrot, also see examples of GSL library.

lolgear

#!/usr/bin/perl
sub before_space{
    for(@_){
  s/[ ]/\\ /g;
    }
    return @_;
}
my $path = $ENV{HOME}.'/';
$path .= q(Library/Application Support/iPhone Simulator);

lolgear

char* inputStringWithStopChar(char stopChar){
    int n = 5;
    int size = n;
    char* const_str = (char*)malloc(n*sizeof(char));
    char* substring = (char*)malloc((n+n)*sizeof(char));
    char*p;
    while((fgets(const_str,n,stdin)!=NULL)&&(strchr(const_str,stopChar)==NULL)){
        strcat(substring,const_str);
        size += n;
        substring = (char*)realloc(substring,size*sizeof(char));

lolgear

class A
		def relativePath(path)
			self.relativePath(path,self.path)
		end

		def self.relativePath(path,to_path)	
			Pathname.new(path).relative_path_from(Pathname.new(to_path))
		end
end

lolgear

class A 
  def needToCallAsInstanceAndClass# or no arguments
    self.class.needToCallAsInstanceAndClass(self.getArgs)
  end
  
  def self.needToCallAsInstanceAndClass(*args)
    # wowowow
    # implementation here
  end
end