Misplaced Pages

Article

Article snapshot taken from Wikipedia with creative commons attribution-sharealike license. Give it a read and then ask your questions in the chat. We can research this topic together.

This is an old revision of this page, as edited by Ankur.verma11111 (talk | contribs) at 08:13, 24 January 2013. The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.

Revision as of 08:13, 24 January 2013 by Ankur.verma11111 (talk | contribs)(diff) ← Previous revision | Latest revision (diff) | Newer revision → (diff) For the Misplaced Pages guidelines, see Misplaced Pages:What is an article?, Misplaced Pages:Good articles and Misplaced Pages:Featured articles. If you arrived here by clicking a link in sample code or a sample template, chances are the template has no connection with this article and the link was simply used as a stand-in for something else.

Article may refer to:

sub payemi($$) { if($_ =~/""/ ||$_=~/""/) { return -1; } $_=$_;

if(!(/^+$/)) { return -2; } if(not($_>0 && $_=~/^+$/)) { return -3;

} open(fh,"<loanemi.dat"); while($str=<fh>) { chomp $str; @arr=split(":",$str);

if($_ eq $arr) { $status=1; } } if(not($status=1)) { return -4; }

close fh;


open(fh,"<loanemi.dat"); while($str=<fh>) { chomp $str; @arr=split(":",$str);

if($_ eq $arr and $arr==0) { $status1=1; } } if($status1==1) { return -5; }

close fh;


open(fh,"<loanemi.dat"); while($str=<fh>) { chomp $str; @arr=split(":",$str);

if($_ eq $arr ) { $dueamount=$arr; $intrest=$arr; $tenure=$arr; } }


close fh;

$interestformonth=$dueamount*($intrest/12*100); $emitobepaid=$interestformonth+($dueamount/$tenure);

if($_>$emitobepaid) { return -6;

}

$dueamount=$dueamount-($_-$interestformonth); if($dueamount<0) { $dueamount=0; }

open(fh,"<loanemi.dat"); @arr=<fh>; close fh;

print "@arr"; foreach $i (@arr) {

@arr1=split(":", $i);

if($_ eq $arr1) { print "\nin if"; print "\n$arr1:$arr1:$arr1:$arr1:$arr1"; $arr1=$dueamount; $arr1=$arr1-1; print "new values:$arr1,$arr1"; $str="$arr1:$arr1:$arr1:$arr1:$arr1"; print "\nString: $str"; @arr=$str;

} else { @arr=$i; } $j++; } print "\nnew array: @arr"; open(fh,"+>loanemi.dat"); print fh @arr; close fh;

return $dueamount; } $a=payemi('C1005',500);

print "\n$a";*Article (publishing), a piece of nonfictional prose that is an independent part of a publication

See also

Topics referred to by the same term Disambiguation iconThis disambiguation page lists articles associated with the title Article.
If an internal link led you here, you may wish to change the link to point directly to the intended article.


hi fsds fs sdf sd fsd fds sd f s

Category: